gd[0][0] = 4*Power(f,2)*L*Power(r,2)*expl(T) ;

gd[0][1] = 0 ;

gd[0][2] = 0 ;

gd[0][3] = 0 ;

gd[0][4] = 0 ;

gd[1][0] = 0 ;

gd[1][1] = (4*L*expl(A*Power(r,2) + T))/Power(f,2) ;

gd[1][2] = (a*F*L*r)/f ;

gd[1][3] = 0 ;

gd[1][4] = 0 ;

gd[2][0] = 0 ;

gd[2][1] = (a*F*L*r)/f ;

gd[2][2] = (4*L*expl(Power(a,2)*B + S))/g ;

gd[2][3] = 0 ;

gd[2][4] = 0 ;

gd[3][0] = 0 ;

gd[3][1] = 0 ;

gd[3][2] = 0 ;

gd[3][3] = (Power(a,2)*g*L*expl(S))/(1 - Power(theta,2)) ;

gd[3][4] = 0 ;

gd[4][0] = 0 ;

gd[4][1] = 0 ;

gd[4][2] = 0 ;

gd[4][3] = 0 ;

gd[4][4] = Power(a,2)*g*L*(1 - Power(theta,2))*expl(S) ;


gu[0][0] = expl(-T)/(4.*Power(f,2)*L*Power(r,2)) ;

gu[0][1] = 0 ;

gu[0][2] = 0 ;

gu[0][3] = 0 ;

gu[0][4] = 0 ;

gu[1][0] = 0 ;

gu[1][1] = (4*Power(f,2))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*expl(-(Power(a,2)*B) - S)) + 16*expl(A*Power(r,2) + T))) ;

gu[1][2] = (a*f*F*g*r)/(L*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) ;

gu[1][3] = 0 ;

gu[1][4] = 0 ;

gu[2][0] = 0 ;

gu[2][1] = (a*f*F*g*r)/(L*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) ;

gu[2][2] = 1/((4*L*expl(Power(a,2)*B + S))/g - (Power(a,2)*Power(F,2)*L*Power(r,2)*expl(-(A*Power(r,2)) - T))/4.) ;

gu[2][3] = 0 ;

gu[2][4] = 0 ;

gu[3][0] = 0 ;

gu[3][1] = 0 ;

gu[3][2] = 0 ;

gu[3][3] = -(((-1 + Power(theta,2))*expl(-S))/(Power(a,2)*g*L)) ;

gu[3][4] = 0 ;

gu[4][0] = 0 ;

gu[4][1] = 0 ;

gu[4][2] = 0 ;

gu[4][3] = 0 ;

gu[4][4] = -(expl(-S)/(Power(a,2)*g*L*(-1 + Power(theta,2)))) ;


R2[0][0] = (-2*Power(f,2)*r*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(a*Power(L,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

R2[0][1] = 0 ;

R2[0][2] = 0 ;

R2[0][3] = 0 ;

R2[0][4] = 0 ;

R2[1][0] = 0 ;

R2[1][1] = (8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*a*Power(f,2)*Power(L,2)*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

R2[1][2] = (-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))/(4.*f*g*Power(L,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

R2[1][3] = 0 ;

R2[1][4] = 0 ;

R2[2][0] = 0 ;

R2[2][1] = (-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))/(4.*f*g*Power(L,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

R2[2][2] = (-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))/(4.*a*g*Power(L,2)*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

R2[2][3] = 0 ;

R2[2][4] = 0 ;

R2[3][0] = 0 ;

R2[3][1] = 0 ;

R2[3][2] = 0 ;

R2[3][3] = (Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(L,2)*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

R2[3][4] = 0 ;

R2[4][0] = 0 ;

R2[4][1] = 0 ;

R2[4][2] = 0 ;

R2[4][3] = 0 ;

R2[4][4] = -((-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*Power(L,2)*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;


C4[0][0][0][0] = 0 ;

C4[0][0][0][1] = 0 ;

C4[0][0][0][2] = 0 ;

C4[0][0][0][3] = 0 ;

C4[0][0][0][4] = 0 ;

C4[0][0][1][0] = 0 ;

C4[0][0][1][1] = 0 ;

C4[0][0][1][2] = 0 ;

C4[0][0][1][3] = 0 ;

C4[0][0][1][4] = 0 ;

C4[0][0][2][0] = 0 ;

C4[0][0][2][1] = 0 ;

C4[0][0][2][2] = 0 ;

C4[0][0][2][3] = 0 ;

C4[0][0][2][4] = 0 ;

C4[0][0][3][0] = 0 ;

C4[0][0][3][1] = 0 ;

C4[0][0][3][2] = 0 ;

C4[0][0][3][3] = 0 ;

C4[0][0][3][4] = 0 ;

C4[0][0][4][0] = 0 ;

C4[0][0][4][1] = 0 ;

C4[0][0][4][2] = 0 ;

C4[0][0][4][3] = 0 ;

C4[0][0][4][4] = 0 ;

C4[0][1][0][0] = 0 ;

C4[0][1][0][1] = (8*(2*g*Power(r,2)*expl(Power(a,2)*B + S)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + f*L*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 3*fr*L*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*Lr*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*L*r*Tr*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*L*r*(fr/f + (Lr/L + 2/r + Tr)/2.)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*L*r*(2*a*F*g*r*(La + L*Ta) + a*Fr*g*Power(r,2)*(La + L*Ta) + a*F*g*Power(r,2)*(Lra + Lr*Ta + L*Tra) - 4*(Power(a,2)*Br + Sr)*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S) - 4*(3*fr*Lr*r + f*(Lrr*r + Lr*(3 + r*Tr)) + L*(2*frr*r + fr*(4 + r*Tr) + f*(Tr + r*Trr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*L*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))*expl(A*Power(r,2) + 2*T))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*g*Power(r,3)*expl(T)*(8*a*A*f*F*L*r*(-4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) + r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) - 4*fr*Power(L,2)*r*(a*F*fr + 2*Aa*r*expl(A*Power(r,2) + T))*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*Power(f,2)*F*(-2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) + Power(a,2)*Power(F,2)*g*r*(-3*Power(Lr,2)*Power(r,2) + 2*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 16*(3*Power(Lr,2)*r + L*Lr*r*(Power(a,2)*Br + Ar*Power(r,2) + Sr + Tr) + L*(-2*Lrr*r + L*(2*Sr - 2*Tr + r*Sr*Tr + Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*f*(-(Power(a,3)*Power(F,3)*g*L*Power(r,2)*(fr*Lr*r + L*(2*frr*r + fr*(4 + 3*r*Tr)))) - 4*a*F*L*(r*(a*Fr*g*La*r - 4*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 + Power(a,2)*Br*r + Ar*Power(r,3) + r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*Fr*g*r*Ta - 8*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,2)*g*r*(-3*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(-2*Lra + Lr*(Aa*Power(r,2) + Ta))) + La*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T)) + Ta*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + r*(a*fr*Fr*r + 2*Tra*expl(A*Power(r,2) + T)))) + 32*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*((Power(a,2)*Br + Sr)*Ta + Aa*r*(2 + r*Tr) - 2*Tra)))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((8*r*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))*expl(A*Power(r,2) + 2*T))/(a*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (r*expl(T)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(a*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (4*r*expl(A*Power(r,2) - S + 2*T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[0][1][0][2] = (2*a*f*F*r*expl(T)*(2*g*Power(r,2)*expl(Power(a,2)*B + S)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + f*L*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 3*fr*L*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*Lr*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*L*r*Tr*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*L*r*(fr/f + (Lr/L + 2/r + Tr)/2.)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*L*r*(2*a*F*g*r*(La + L*Ta) + a*Fr*g*Power(r,2)*(La + L*Ta) + a*F*g*Power(r,2)*(Lra + Lr*Ta + L*Tra) - 4*(Power(a,2)*Br + Sr)*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S) - 4*(3*fr*Lr*r + f*(Lrr*r + Lr*(3 + r*Tr)) + L*(2*frr*r + fr*(4 + r*Tr) + f*(Tr + r*Trr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*L*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*f*Power(r,2)*expl(Power(a,2)*B + S + T)*(8*a*A*f*F*L*r*(-4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) + r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) - 4*fr*Power(L,2)*r*(a*F*fr + 2*Aa*r*expl(A*Power(r,2) + T))*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*Power(f,2)*F*(-2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) + Power(a,2)*Power(F,2)*g*r*(-3*Power(Lr,2)*Power(r,2) + 2*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 16*(3*Power(Lr,2)*r + L*Lr*r*(Power(a,2)*Br + Ar*Power(r,2) + Sr + Tr) + L*(-2*Lrr*r + L*(2*Sr - 2*Tr + r*Sr*Tr + Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*f*(-(Power(a,3)*Power(F,3)*g*L*Power(r,2)*(fr*Lr*r + L*(2*frr*r + fr*(4 + 3*r*Tr)))) - 4*a*F*L*(r*(a*Fr*g*La*r - 4*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 + Power(a,2)*Br*r + Ar*Power(r,3) + r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*Fr*g*r*Ta - 8*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,2)*g*r*(-3*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(-2*Lra + Lr*(Aa*Power(r,2) + Ta))) + La*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T)) + Ta*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + r*(a*fr*Fr*r + 2*Tra*expl(A*Power(r,2) + T)))) + 32*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*((Power(a,2)*Br + Sr)*Ta + Aa*r*(2 + r*Tr) - 2*Tra)))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((2*f*F*Power(r,2)*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (f*Power(r,2)*expl(T)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (a*f*F*Power(r,2)*expl(-S + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[0][1][0][3] = 0 ;

C4[0][1][0][4] = 0 ;

C4[0][1][1][0] = 4*Power(f,2)*L*Power(r,2)*expl(T)*(-(Power(fr,2)/Power(f,2)) + frr/f + Power(fr/f + (Lr/L + 2/r + Tr)/2.,2) + (-(Power(Lr,2)/Power(L,2)) + Lrr/L - 2/Power(r,2) + Trr)/2. + (g*(La + L*Ta)*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(Power(f,2)*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - ((fr/f + (Lr/L + 2/r + Tr)/2.)*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + ((-8*r*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))*expl(A*Power(r,2) + 2*T))/(a*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (r*expl(T)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(a*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. - (4*r*expl(A*Power(r,2) - S + 2*T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[0][1][1][1] = 0 ;

C4[0][1][1][2] = 0 ;

C4[0][1][1][3] = 0 ;

C4[0][1][1][4] = 0 ;

C4[0][1][2][0] = 2*Power(f,2)*L*Power(r,2)*expl(T)*(-((La*Lr)/Power(L,2)) + Lra/L + (La/L + Ta)*(fr/f + (Lr/L + 2/r + Tr)/2.) + Tra + (2*(La + L*Ta)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (4*(fr/f + (Lr/L + 2/r + Tr)/2.)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + ((-2*f*F*Power(r,2)*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (f*Power(r,2)*expl(T)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. - (a*f*F*Power(r,2)*expl(-S + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[0][1][2][1] = 0 ;

C4[0][1][2][2] = 0 ;

C4[0][1][2][3] = 0 ;

C4[0][1][2][4] = 0 ;

C4[0][1][3][0] = 0 ;

C4[0][1][3][1] = 0 ;

C4[0][1][3][2] = 0 ;

C4[0][1][3][3] = 0 ;

C4[0][1][3][4] = 0 ;

C4[0][1][4][0] = 0 ;

C4[0][1][4][1] = 0 ;

C4[0][1][4][2] = 0 ;

C4[0][1][4][3] = 0 ;

C4[0][1][4][4] = 0 ;

C4[0][2][0][0] = 0 ;

C4[0][2][0][1] = (a*f*F*Power(r,2)*expl(T)*(-4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*ga*L*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*g*La*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*g*L*r*Ta*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - g*L*r*(La/L + Ta)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*g*L*r*(F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) + a*Fa*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) + a*F*(2*fr*La*r + f*(La*(2 + r*Tr) + r*(Lra + L*Tra))) - 4*(Aa*Power(r,2) + Ta)*(La + L*Ta)*expl(A*Power(r,2) + T) - 4*(Laa + La*Ta + L*Taa)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + (2*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*g*L*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*f*r*(4*r*expl(Power(a,2)*B + S)*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T)) + 4*expl(Power(a,2)*B + S)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) - 2*La*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*Ta*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(La/L + Ta)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(F*g*Power(r,2)*(La + L*Ta) + a*Fa*g*Power(r,2)*(La + L*Ta) + a*F*ga*Power(r,2)*(La + L*Ta) + a*F*g*Power(r,2)*(Laa + La*Ta + L*Taa) - 4*(2*a*B + Power(a,2)*Ba + Sa)*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S) - 4*(2*fr*La*r + f*(La*(2 + r*Tr) + r*(Lra + L*Tra)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))*expl(A*Power(r,2) + 2*T))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((2*f*F*Power(r,2)*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (f*Power(r,2)*expl(T)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (a*f*F*Power(r,2)*expl(-S + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[0][2][0][2] = (a*Power(f,2)*F*Power(r,2)*expl(T)*(4*r*expl(Power(a,2)*B + S)*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T)) + 4*expl(Power(a,2)*B + S)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) - 2*La*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*Ta*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(La/L + Ta)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(F*g*Power(r,2)*(La + L*Ta) + a*Fa*g*Power(r,2)*(La + L*Ta) + a*F*ga*Power(r,2)*(La + L*Ta) + a*F*g*Power(r,2)*(Laa + La*Ta + L*Taa) - 4*(2*a*B + Power(a,2)*Ba + Sa)*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S) - 4*(2*fr*La*r + f*(La*(2 + r*Tr) + r*(Lra + L*Tra)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*Power(f,2)*r*expl(Power(a,2)*B + S + T)*(-4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*ga*L*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*g*La*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*g*L*r*Ta*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - g*L*r*(La/L + Ta)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*g*L*r*(F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) + a*Fa*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) + a*F*(2*fr*La*r + f*(La*(2 + r*Tr) + r*(Lra + L*Tra))) - 4*(Aa*Power(r,2) + Ta)*(La + L*Ta)*expl(A*Power(r,2) + T) - 4*(Laa + La*Ta + L*Taa)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + (2*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*g*L*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((8*Power(f,2)*r*expl(Power(a,2)*B + S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(a*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(f,2)*r*expl(T)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(a*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (4*Power(f,2)*r*expl(Power(a,2)*B + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(g,2)*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[0][2][0][3] = 0 ;

C4[0][2][0][4] = 0 ;

C4[0][2][1][0] = 2*Power(f,2)*L*Power(r,2)*expl(T)*(-((La*Lr)/Power(L,2)) + Lra/L + (La/L + Ta)*(fr/f + (Lr/L + 2/r + Tr)/2.) + Tra + (2*(La + L*Ta)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (4*(fr/f + (Lr/L + 2/r + Tr)/2.)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + ((-2*f*F*Power(r,2)*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (f*Power(r,2)*expl(T)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. - (a*f*F*Power(r,2)*expl(-S + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[0][2][1][1] = 0 ;

C4[0][2][1][2] = 0 ;

C4[0][2][1][3] = 0 ;

C4[0][2][1][4] = 0 ;

C4[0][2][2][0] = Power(f,2)*L*Power(r,2)*expl(T)*(Power(La/L + Ta,2) + 2*(-(Power(La,2)/Power(L,2)) + Laa/L + Taa) + (4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S)*(-2*a*Fa*g*L*r + F*r*(-(a*ga*L) + g*(-(a*La) + L*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa))) + 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)))/(g*Power(L,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*(La/L + Ta)*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*L*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + ((-8*Power(f,2)*r*expl(Power(a,2)*B + S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(a*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(f,2)*r*expl(T)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(a*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. - (4*Power(f,2)*r*expl(Power(a,2)*B + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(g,2)*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[0][2][2][1] = 0 ;

C4[0][2][2][2] = 0 ;

C4[0][2][2][3] = 0 ;

C4[0][2][2][4] = 0 ;

C4[0][2][3][0] = 0 ;

C4[0][2][3][1] = 0 ;

C4[0][2][3][2] = 0 ;

C4[0][2][3][3] = 0 ;

C4[0][2][3][4] = 0 ;

C4[0][2][4][0] = 0 ;

C4[0][2][4][1] = 0 ;

C4[0][2][4][2] = 0 ;

C4[0][2][4][3] = 0 ;

C4[0][2][4][4] = 0 ;

C4[0][3][0][0] = 0 ;

C4[0][3][0][1] = 0 ;

C4[0][3][0][2] = 0 ;

C4[0][3][0][3] = (Power(a,2)*Power(f,2)*g*r*(f*(Lr/L + Sr)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S)) + g*r*(2/a + ga/g + La/L + Sa)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T)))*expl(S + T))/((1 - Power(theta,2))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (Power(a,2)*Power(f,2)*r*expl(T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((2*a*Power(f,2)*g*r*expl(S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(f,2)*r*expl(T)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[0][3][0][4] = 0 ;

C4[0][3][1][0] = 0 ;

C4[0][3][1][1] = 0 ;

C4[0][3][1][2] = 0 ;

C4[0][3][1][3] = 0 ;

C4[0][3][1][4] = 0 ;

C4[0][3][2][0] = 0 ;

C4[0][3][2][1] = 0 ;

C4[0][3][2][2] = 0 ;

C4[0][3][2][3] = 0 ;

C4[0][3][2][4] = 0 ;

C4[0][3][3][0] = (a*Power(f,2)*g*Power(r,2)*(-2*a*f*(fr/f + (Lr/L + 2/r + Tr)/2.)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)) - (La/L + Ta)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))*expl(S + T))/((-1 + Power(theta,2))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (Power(a,2)*Power(f,2)*r*expl(T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-2*a*Power(f,2)*g*r*expl(S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(f,2)*r*expl(T)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[0][3][3][1] = 0 ;

C4[0][3][3][2] = 0 ;

C4[0][3][3][3] = 0 ;

C4[0][3][3][4] = 0 ;

C4[0][3][4][0] = 0 ;

C4[0][3][4][1] = 0 ;

C4[0][3][4][2] = 0 ;

C4[0][3][4][3] = 0 ;

C4[0][3][4][4] = 0 ;

C4[0][4][0][0] = 0 ;

C4[0][4][0][1] = 0 ;

C4[0][4][0][2] = 0 ;

C4[0][4][0][3] = 0 ;

C4[0][4][0][4] = (Power(a,2)*Power(f,2)*g*r*(1 - Power(theta,2))*(f*(Lr/L + Sr)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S)) + g*r*(2/a + ga/g + La/L + Sa)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T)))*expl(S + T))/(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + (Power(a,2)*Power(f,2)*r*(1 - Power(theta,2))*expl(T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((2*a*Power(f,2)*g*r*(1 - Power(theta,2))*expl(S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(f,2)*r*(-1 + Power(theta,2))*expl(T)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[0][4][1][0] = 0 ;

C4[0][4][1][1] = 0 ;

C4[0][4][1][2] = 0 ;

C4[0][4][1][3] = 0 ;

C4[0][4][1][4] = 0 ;

C4[0][4][2][0] = 0 ;

C4[0][4][2][1] = 0 ;

C4[0][4][2][2] = 0 ;

C4[0][4][2][3] = 0 ;

C4[0][4][2][4] = 0 ;

C4[0][4][3][0] = 0 ;

C4[0][4][3][1] = 0 ;

C4[0][4][3][2] = 0 ;

C4[0][4][3][3] = 0 ;

C4[0][4][3][4] = 0 ;

C4[0][4][4][0] = (a*Power(f,2)*g*Power(r,2)*(-1 + Power(theta,2))*(-2*a*f*(fr/f + (Lr/L + 2/r + Tr)/2.)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)) - (La/L + Ta)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))*expl(S + T))/(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - (Power(a,2)*Power(f,2)*r*(1 - Power(theta,2))*expl(T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-2*a*Power(f,2)*g*r*(1 - Power(theta,2))*expl(S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(f,2)*r*(-1 + Power(theta,2))*expl(T)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[0][4][4][1] = 0 ;

C4[0][4][4][2] = 0 ;

C4[0][4][4][3] = 0 ;

C4[0][4][4][4] = 0 ;

C4[1][0][0][0] = 0 ;

C4[1][0][0][1] = (8*(-2*g*Power(r,2)*expl(Power(a,2)*B + S)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) - f*L*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 3*fr*L*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*Lr*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*L*r*Tr*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*L*r*(fr/f + (Lr/L + 2/r + Tr)/2.)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*L*r*(2*a*F*g*r*(La + L*Ta) + a*Fr*g*Power(r,2)*(La + L*Ta) + a*F*g*Power(r,2)*(Lra + Lr*Ta + L*Tra) - 4*(Power(a,2)*Br + Sr)*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S) - 4*(3*fr*Lr*r + f*(Lrr*r + Lr*(3 + r*Tr)) + L*(2*frr*r + fr*(4 + r*Tr) + f*(Tr + r*Trr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*L*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))*expl(A*Power(r,2) + 2*T))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*g*Power(r,3)*expl(T)*(8*a*A*f*F*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 4*fr*Power(L,2)*r*(a*F*fr + 2*Aa*r*expl(A*Power(r,2) + T))*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*Power(f,2)*F*(-2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) + Power(a,2)*Power(F,2)*g*r*(-3*Power(Lr,2)*Power(r,2) + 2*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 16*(3*Power(Lr,2)*r + L*Lr*r*(Power(a,2)*Br + Ar*Power(r,2) + Sr + Tr) + L*(-2*Lrr*r + L*(2*Sr - 2*Tr + r*Sr*Tr + Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*f*(-(Power(a,3)*Power(F,3)*g*L*Power(r,2)*(fr*Lr*r + L*(2*frr*r + fr*(4 + 3*r*Tr)))) - 4*a*F*L*(r*(a*Fr*g*La*r - 4*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 + Power(a,2)*Br*r + Ar*Power(r,3) + r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*Fr*g*r*Ta - 8*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,2)*g*r*(-3*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(-2*Lra + Lr*(Aa*Power(r,2) + Ta))) + La*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T)) + Ta*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + r*(a*fr*Fr*r + 2*Tra*expl(A*Power(r,2) + T)))) + 32*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*((Power(a,2)*Br + Sr)*Ta + Aa*r*(2 + r*Tr) - 2*Tra)))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-8*r*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))*expl(A*Power(r,2) + 2*T))/(a*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (r*expl(T)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(a*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. - (4*r*expl(A*Power(r,2) - S + 2*T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[1][0][0][2] = (2*a*f*F*r*expl(T)*(-2*g*Power(r,2)*expl(Power(a,2)*B + S)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) - f*L*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 3*fr*L*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*Lr*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*L*r*Tr*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*L*r*(fr/f + (Lr/L + 2/r + Tr)/2.)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - f*L*r*(2*a*F*g*r*(La + L*Ta) + a*Fr*g*Power(r,2)*(La + L*Ta) + a*F*g*Power(r,2)*(Lra + Lr*Ta + L*Tra) - 4*(Power(a,2)*Br + Sr)*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S) - 4*(3*fr*Lr*r + f*(Lrr*r + Lr*(3 + r*Tr)) + L*(2*frr*r + fr*(4 + r*Tr) + f*(Tr + r*Trr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*L*r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - r*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*f*Power(r,2)*expl(Power(a,2)*B + S + T)*(8*a*A*f*F*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 4*fr*Power(L,2)*r*(a*F*fr + 2*Aa*r*expl(A*Power(r,2) + T))*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*Power(f,2)*F*(-2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) + Power(a,2)*Power(F,2)*g*r*(-3*Power(Lr,2)*Power(r,2) + 2*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 16*(3*Power(Lr,2)*r + L*Lr*r*(Power(a,2)*Br + Ar*Power(r,2) + Sr + Tr) + L*(-2*Lrr*r + L*(2*Sr - 2*Tr + r*Sr*Tr + Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*f*(-(Power(a,3)*Power(F,3)*g*L*Power(r,2)*(fr*Lr*r + L*(2*frr*r + fr*(4 + 3*r*Tr)))) - 4*a*F*L*(r*(a*Fr*g*La*r - 4*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 + Power(a,2)*Br*r + Ar*Power(r,3) + r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*Fr*g*r*Ta - 8*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,2)*g*r*(-3*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(-2*Lra + Lr*(Aa*Power(r,2) + Ta))) + La*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T)) + Ta*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + r*(a*fr*Fr*r + 2*Tra*expl(A*Power(r,2) + T)))) + 32*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*((Power(a,2)*Br + Sr)*Ta + Aa*r*(2 + r*Tr) - 2*Tra)))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-2*f*F*Power(r,2)*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (f*Power(r,2)*expl(T)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. - (a*f*F*Power(r,2)*expl(-S + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[1][0][0][3] = 0 ;

C4[1][0][0][4] = 0 ;

C4[1][0][1][0] = 4*Power(f,2)*L*Power(r,2)*expl(T)*(Power(fr,2)/Power(f,2) - frr/f - Power(fr/f + (Lr/L + 2/r + Tr)/2.,2) + (Power(Lr,2)/Power(L,2) - Lrr/L + 2/Power(r,2) - Trr)/2. - (g*(La + L*Ta)*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(Power(f,2)*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + ((fr/f + (Lr/L + 2/r + Tr)/2.)*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + ((8*r*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))*expl(A*Power(r,2) + 2*T))/(a*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (r*expl(T)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(a*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (4*r*expl(A*Power(r,2) - S + 2*T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[1][0][1][1] = 0 ;

C4[1][0][1][2] = 0 ;

C4[1][0][1][3] = 0 ;

C4[1][0][1][4] = 0 ;

C4[1][0][2][0] = 2*Power(f,2)*L*Power(r,2)*expl(T)*((La*Lr)/Power(L,2) - Lra/L - (La/L + Ta)*(fr/f + (Lr/L + 2/r + Tr)/2.) - Tra - (2*(La + L*Ta)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (4*(fr/f + (Lr/L + 2/r + Tr)/2.)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + ((2*f*F*Power(r,2)*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (f*Power(r,2)*expl(T)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (a*f*F*Power(r,2)*expl(-S + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[1][0][2][1] = 0 ;

C4[1][0][2][2] = 0 ;

C4[1][0][2][3] = 0 ;

C4[1][0][2][4] = 0 ;

C4[1][0][3][0] = 0 ;

C4[1][0][3][1] = 0 ;

C4[1][0][3][2] = 0 ;

C4[1][0][3][3] = 0 ;

C4[1][0][3][4] = 0 ;

C4[1][0][4][0] = 0 ;

C4[1][0][4][1] = 0 ;

C4[1][0][4][2] = 0 ;

C4[1][0][4][3] = 0 ;

C4[1][0][4][4] = 0 ;

C4[1][1][0][0] = 0 ;

C4[1][1][0][1] = 0 ;

C4[1][1][0][2] = 0 ;

C4[1][1][0][3] = 0 ;

C4[1][1][0][4] = 0 ;

C4[1][1][1][0] = 0 ;

C4[1][1][1][1] = 0 ;

C4[1][1][1][2] = 0 ;

C4[1][1][1][3] = 0 ;

C4[1][1][1][4] = 0 ;

C4[1][1][2][0] = 0 ;

C4[1][1][2][1] = 0 ;

C4[1][1][2][2] = 0 ;

C4[1][1][2][3] = 0 ;

C4[1][1][2][4] = 0 ;

C4[1][1][3][0] = 0 ;

C4[1][1][3][1] = 0 ;

C4[1][1][3][2] = 0 ;

C4[1][1][3][3] = 0 ;

C4[1][1][3][4] = 0 ;

C4[1][1][4][0] = 0 ;

C4[1][1][4][1] = 0 ;

C4[1][1][4][2] = 0 ;

C4[1][1][4][3] = 0 ;

C4[1][1][4][4] = 0 ;

C4[1][2][0][0] = 0 ;

C4[1][2][0][1] = 0 ;

C4[1][2][0][2] = 0 ;

C4[1][2][0][3] = 0 ;

C4[1][2][0][4] = 0 ;

C4[1][2][1][0] = 0 ;

C4[1][2][1][1] = (4*expl(A*Power(r,2) + T)*((4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/f - (4*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/f + 2*Lr*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*expl(Power(a,2)*B + S)*(-(a*f*F*(Lr + L*(Power(a,2)*Br + Sr))) - a*F*fr*r*(Lr + L*(Power(a,2)*Br + Sr)) - a*f*Fr*r*(Lr + L*(Power(a,2)*Br + Sr)) - a*f*F*r*(Lrr + Lr*(Power(a,2)*Br + Sr) + L*(Power(a,2)*Brr + Srr)) + 4*(La + L*(Aa*Power(r,2) + Ta))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T) + 4*(Lra + Lr*(Aa*Power(r,2) + Ta) + L*(2*Aa*r + Ara*Power(r,2) + Tra))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - (La*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f - (L*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f + (L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*Fa*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*F*ga*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*F*g*r*(F*fr*L*r + a*Fa*fr*L*r + a*F*fr*La*r - f*(Fr*L*r + F*(L + Lr*r)) - a*f*(Fra*L*r + Fr*La*r + Fa*(L + Lr*r) + F*(La + Lra*r)) + 2*(Aa*Power(r,2) + Ta)*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T) + 2*(Laa + La*(Aa*Power(r,2) + Ta) + L*(Aaa*Power(r,2) + Taa))*expl(A*Power(r,2) + T)) + 8*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(f*Lra + 2*Aa*f*L*r + 2*A*f*La*r + La*(-2*fr + f*(Ar*Power(r,2) + Tr)) + f*L*(Ara*Power(r,2) + Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f))/(Power(f,2)*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (4*a*F*r*expl(A*Power(r,2) + T)*(-2*expl(A*Power(r,2) + T)*(-(Power(a,2)*F*Fa*Power(g,2)*L*Power(r,2)*(La + L*(Aa*Power(r,2) + Ta))) + a*Power(F,2)*Power(g,2)*Power(r,2)*(-(a*Power(La,2)) + L*(a*Laa + La*(-1 + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(a*Aaa*Power(r,2) + a*Power(Aa,2)*Power(r,4) - Ta + a*Power(Ta,2) + Aa*Power(r,2)*(-1 + 2*a*Ta) + a*Taa)) + 16*a*B*g*L*(La + L*(Aa*Power(r,2) + Ta))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(-2*g*Power(La,2) + L*(ga*La + g*(2*Laa + La*(-(Power(a,2)*Ba) + Aa*Power(r,2) - Sa + Ta))) + Power(L,2)*(ga*(Aa*Power(r,2) + Ta) + g*(2*Aaa*Power(r,2) + Power(Aa,2)*Power(r,4) - Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta) - Power(a,2)*Ba*Ta - Sa*Ta + Power(Ta,2) + 2*Taa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(f,2)*expl(Power(a,2)*B + S)*(-(Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr + L*(Power(a,2)*Br + Sr))) + Power(a,2)*Power(F,2)*g*r*(-(Power(Lr,2)*r) + L*(Lrr*r + Lr*(-1 + Power(a,2)*Br*r + r*Sr)) + Power(L,2)*(Power(a,4)*Power(Br,2)*r + Power(a,2)*Brr*r - Sr + r*Power(Sr,2) + Power(a,2)*Br*(-1 + 2*r*Sr) + r*Srr)) + 16*A*L*r*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(2*Power(Lr,2) + L*Lr*(-(Power(a,2)*Br) + Ar*Power(r,2) - Sr + Tr) + L*(-2*Lrr + L*(-(Power(a,4)*Power(Br,2)) - 2*Power(a,2)*Brr - Power(Sr,2) + Ar*Power(r,2)*(Power(a,2)*Br + Sr) - 2*Srr + Sr*Tr + Power(a,2)*Br*(-2*Sr + Tr))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*(Power(a,3)*Power(F,3)*Power(g,2)*(-(La*Lr) + L*Lra)*Power(r,3) - Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*Fra*g*L*r) + 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 8*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(4*a*La*Lr*r + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) + a*Aa*Power(r,3)*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr - a*r*Sa*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)) + L*(r*(-4*a*Lra + Lr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa + a*Ta)) + a*La*(-2 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(Power(f,3)*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[1][2][1][2] = (a*F*r*((4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/f - (4*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/f + 2*Lr*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*expl(Power(a,2)*B + S)*(-(a*f*F*(Lr + L*(Power(a,2)*Br + Sr))) - a*F*fr*r*(Lr + L*(Power(a,2)*Br + Sr)) - a*f*Fr*r*(Lr + L*(Power(a,2)*Br + Sr)) - a*f*F*r*(Lrr + Lr*(Power(a,2)*Br + Sr) + L*(Power(a,2)*Brr + Srr)) + 4*(La + L*(Aa*Power(r,2) + Ta))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T) + 4*(Lra + Lr*(Aa*Power(r,2) + Ta) + L*(2*Aa*r + Ara*Power(r,2) + Tra))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - (La*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f - (L*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f + (L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*Fa*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*F*ga*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*F*g*r*(F*fr*L*r + a*Fa*fr*L*r + a*F*fr*La*r - f*(Fr*L*r + F*(L + Lr*r)) - a*f*(Fra*L*r + Fr*La*r + Fa*(L + Lr*r) + F*(La + Lra*r)) + 2*(Aa*Power(r,2) + Ta)*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T) + 2*(Laa + La*(Aa*Power(r,2) + Ta) + L*(Aaa*Power(r,2) + Taa))*expl(A*Power(r,2) + T)) + 8*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(f*Lra + 2*Aa*f*L*r + 2*A*f*La*r + La*(-2*fr + f*(Ar*Power(r,2) + Tr)) + f*L*(Ara*Power(r,2) + Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f))/(f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (16*expl(Power(a,2)*B + A*Power(r,2) + S + T)*(-2*expl(A*Power(r,2) + T)*(-(Power(a,2)*F*Fa*Power(g,2)*L*Power(r,2)*(La + L*(Aa*Power(r,2) + Ta))) + a*Power(F,2)*Power(g,2)*Power(r,2)*(-(a*Power(La,2)) + L*(a*Laa + La*(-1 + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(a*Aaa*Power(r,2) + a*Power(Aa,2)*Power(r,4) - Ta + a*Power(Ta,2) + Aa*Power(r,2)*(-1 + 2*a*Ta) + a*Taa)) + 16*a*B*g*L*(La + L*(Aa*Power(r,2) + Ta))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(-2*g*Power(La,2) + L*(ga*La + g*(2*Laa + La*(-(Power(a,2)*Ba) + Aa*Power(r,2) - Sa + Ta))) + Power(L,2)*(ga*(Aa*Power(r,2) + Ta) + g*(2*Aaa*Power(r,2) + Power(Aa,2)*Power(r,4) - Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta) - Power(a,2)*Ba*Ta - Sa*Ta + Power(Ta,2) + 2*Taa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(f,2)*expl(Power(a,2)*B + S)*(-(Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr + L*(Power(a,2)*Br + Sr))) + Power(a,2)*Power(F,2)*g*r*(-(Power(Lr,2)*r) + L*(Lrr*r + Lr*(-1 + Power(a,2)*Br*r + r*Sr)) + Power(L,2)*(Power(a,4)*Power(Br,2)*r + Power(a,2)*Brr*r - Sr + r*Power(Sr,2) + Power(a,2)*Br*(-1 + 2*r*Sr) + r*Srr)) + 16*A*L*r*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(2*Power(Lr,2) + L*Lr*(-(Power(a,2)*Br) + Ar*Power(r,2) - Sr + Tr) + L*(-2*Lrr + L*(-(Power(a,4)*Power(Br,2)) - 2*Power(a,2)*Brr - Power(Sr,2) + Ar*Power(r,2)*(Power(a,2)*Br + Sr) - 2*Srr + Sr*Tr + Power(a,2)*Br*(-2*Sr + Tr))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*(Power(a,3)*Power(F,3)*Power(g,2)*(-(La*Lr) + L*Lra)*Power(r,3) - Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*Fra*g*L*r) + 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 8*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(4*a*La*Lr*r + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) + a*Aa*Power(r,3)*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr - a*r*Sa*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)) + L*(r*(-4*a*Lra + Lr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa + a*Ta)) + a*La*(-2 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(Power(f,2)*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-((expl(A*Power(r,2) + T)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(a*Power(f,2)*g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2))) + (a*F*r*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(2.*Power(f,2)*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (expl(Power(a,2)*B + S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(a*Power(f,2)*g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (expl(-S)*(-((Power(a,2)*Power(F,2)*Power(L,2)*Power(r,2))/Power(f,2)) + (16*Power(L,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(Power(f,2)*g))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*g*Power(L,3)*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[1][2][1][3] = 0 ;

C4[1][2][1][4] = 0 ;

C4[1][2][2][0] = 0 ;

C4[1][2][2][1] = (a*F*r*((-4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (2*La*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*L*(Aa*Power(r,2) + Ta)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*L*(F*g*r*(La + L*(Aa*Power(r,2) + Ta)) + a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) + a*F*ga*r*(La + L*(Aa*Power(r,2) + Ta)) + a*F*g*r*(Laa + La*(Aa*Power(r,2) + Ta) + L*(Aaa*Power(r,2) + Taa)) - 4*f*(2*a*B + Power(a,2)*Ba + Sa)*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 4*f*(Lra + La*(Power(a,2)*Br + Sr) + L*(2*a*Br + Power(a,2)*Bra + Sra))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (Lr*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*L*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (2*L*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(Power(a,2)*Power(F,2)*g*r + Power(a,2)*F*Fr*g*Power(r,2) - 8*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (L*(a*F*g*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + a*Fr*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + a*F*g*r*(g*(a*Fa*L + F*(L + a*La)) + g*(a*Fra*L + Fr*(L + a*La) + a*Fa*Lr + F*(Lr + a*Lra))*r - 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 2*f*(Power(a,2)*Br + Sr)*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 2*f*(Lrr + Lr*(Power(a,2)*Br + Sr) + L*(Power(a,2)*Brr + Srr))*expl(Power(a,2)*B + S)) - 8*(2*a*Br*g*L + 2*a*B*g*Lr + g*Lra + Lr*(-ga + g*(Power(a,2)*Ba + Sa)) + g*L*(Power(a,2)*Bra + Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(f*L) + (16*expl(Power(a,2)*B + A*Power(r,2) + S + T)*(-2*expl(A*Power(r,2) + T)*(-(Power(a,2)*F*Fa*Power(g,2)*L*Power(r,2)*(La + L*(Aa*Power(r,2) + Ta))) + a*Power(F,2)*Power(g,2)*Power(r,2)*(-(a*Power(La,2)) + L*(a*Laa + La*(-1 + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(a*Aaa*Power(r,2) + a*Power(Aa,2)*Power(r,4) - Ta + a*Power(Ta,2) + Aa*Power(r,2)*(-1 + 2*a*Ta) + a*Taa)) + 16*a*B*g*L*(La + L*(Aa*Power(r,2) + Ta))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(-2*g*Power(La,2) + L*(ga*La + g*(2*Laa + La*(-(Power(a,2)*Ba) + Aa*Power(r,2) - Sa + Ta))) + Power(L,2)*(ga*(Aa*Power(r,2) + Ta) + g*(2*Aaa*Power(r,2) + Power(Aa,2)*Power(r,4) - Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta) - Power(a,2)*Ba*Ta - Sa*Ta + Power(Ta,2) + 2*Taa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(f,2)*expl(Power(a,2)*B + S)*(-(Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr + L*(Power(a,2)*Br + Sr))) + Power(a,2)*Power(F,2)*g*r*(-(Power(Lr,2)*r) + L*(Lrr*r + Lr*(-1 + Power(a,2)*Br*r + r*Sr)) + Power(L,2)*(Power(a,4)*Power(Br,2)*r + Power(a,2)*Brr*r - Sr + r*Power(Sr,2) + Power(a,2)*Br*(-1 + 2*r*Sr) + r*Srr)) + 16*A*L*r*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(2*Power(Lr,2) + L*Lr*(-(Power(a,2)*Br) + Ar*Power(r,2) - Sr + Tr) + L*(-2*Lrr + L*(-(Power(a,4)*Power(Br,2)) - 2*Power(a,2)*Brr - Power(Sr,2) + Ar*Power(r,2)*(Power(a,2)*Br + Sr) - 2*Srr + Sr*Tr + Power(a,2)*Br*(-2*Sr + Tr))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*(Power(a,3)*Power(F,3)*Power(g,2)*(-(La*Lr) + L*Lra)*Power(r,3) - Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*Fra*g*L*r) + 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 8*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(4*a*La*Lr*r + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) + a*Aa*Power(r,3)*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr - a*r*Sa*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)) + L*(r*(-4*a*Lra + Lr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa + a*Ta)) + a*La*(-2 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(Power(f,2)*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((expl(A*Power(r,2) + T)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(a*Power(f,2)*g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*r*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(2.*Power(f,2)*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (expl(Power(a,2)*B + S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(a*Power(f,2)*g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (expl(-S)*((Power(a,2)*Power(F,2)*Power(L,2)*Power(r,2))/Power(f,2) - (16*Power(L,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(Power(f,2)*g))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*g*Power(L,3)*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[1][2][2][2] = (4*expl(Power(a,2)*B + S)*((-4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (2*La*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*L*(Aa*Power(r,2) + Ta)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*L*(F*g*r*(La + L*(Aa*Power(r,2) + Ta)) + a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) + a*F*ga*r*(La + L*(Aa*Power(r,2) + Ta)) + a*F*g*r*(Laa + La*(Aa*Power(r,2) + Ta) + L*(Aaa*Power(r,2) + Taa)) - 4*f*(2*a*B + Power(a,2)*Ba + Sa)*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 4*f*(Lra + La*(Power(a,2)*Br + Sr) + L*(2*a*Br + Power(a,2)*Bra + Sra))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (Lr*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*L*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (2*L*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(Power(a,2)*Power(F,2)*g*r + Power(a,2)*F*Fr*g*Power(r,2) - 8*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (L*(a*F*g*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + a*Fr*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + a*F*g*r*(g*(a*Fa*L + F*(L + a*La)) + g*(a*Fra*L + Fr*(L + a*La) + a*Fa*Lr + F*(Lr + a*Lra))*r - 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 2*f*(Power(a,2)*Br + Sr)*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 2*f*(Lrr + Lr*(Power(a,2)*Br + Sr) + L*(Power(a,2)*Brr + Srr))*expl(Power(a,2)*B + S)) - 8*(2*a*Br*g*L + 2*a*B*g*Lr + g*Lra + Lr*(-ga + g*(Power(a,2)*Ba + Sa)) + g*L*(Power(a,2)*Bra + Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(g*L) + (4*a*F*r*expl(Power(a,2)*B + S)*(-2*expl(A*Power(r,2) + T)*(-(Power(a,2)*F*Fa*Power(g,2)*L*Power(r,2)*(La + L*(Aa*Power(r,2) + Ta))) + a*Power(F,2)*Power(g,2)*Power(r,2)*(-(a*Power(La,2)) + L*(a*Laa + La*(-1 + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(a*Aaa*Power(r,2) + a*Power(Aa,2)*Power(r,4) - Ta + a*Power(Ta,2) + Aa*Power(r,2)*(-1 + 2*a*Ta) + a*Taa)) + 16*a*B*g*L*(La + L*(Aa*Power(r,2) + Ta))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(-2*g*Power(La,2) + L*(ga*La + g*(2*Laa + La*(-(Power(a,2)*Ba) + Aa*Power(r,2) - Sa + Ta))) + Power(L,2)*(ga*(Aa*Power(r,2) + Ta) + g*(2*Aaa*Power(r,2) + Power(Aa,2)*Power(r,4) - Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta) - Power(a,2)*Ba*Ta - Sa*Ta + Power(Ta,2) + 2*Taa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(f,2)*expl(Power(a,2)*B + S)*(-(Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr + L*(Power(a,2)*Br + Sr))) + Power(a,2)*Power(F,2)*g*r*(-(Power(Lr,2)*r) + L*(Lrr*r + Lr*(-1 + Power(a,2)*Br*r + r*Sr)) + Power(L,2)*(Power(a,4)*Power(Br,2)*r + Power(a,2)*Brr*r - Sr + r*Power(Sr,2) + Power(a,2)*Br*(-1 + 2*r*Sr) + r*Srr)) + 16*A*L*r*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(2*Power(Lr,2) + L*Lr*(-(Power(a,2)*Br) + Ar*Power(r,2) - Sr + Tr) + L*(-2*Lrr + L*(-(Power(a,4)*Power(Br,2)) - 2*Power(a,2)*Brr - Power(Sr,2) + Ar*Power(r,2)*(Power(a,2)*Br + Sr) - 2*Srr + Sr*Tr + Power(a,2)*Br*(-2*Sr + Tr))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*(Power(a,3)*Power(F,3)*Power(g,2)*(-(La*Lr) + L*Lra)*Power(r,3) - Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*Fra*g*L*r) + 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 8*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(4*a*La*Lr*r + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) + a*Aa*Power(r,3)*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr - a*r*Sa*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)) + L*(r*(-4*a*Lra + Lr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa + a*Ta)) + a*La*(-2 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(f*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[1][2][2][3] = 0 ;

C4[1][2][2][4] = 0 ;

C4[1][2][3][0] = 0 ;

C4[1][2][3][1] = 0 ;

C4[1][2][3][2] = 0 ;

C4[1][2][3][3] = 0 ;

C4[1][2][3][4] = 0 ;

C4[1][2][4][0] = 0 ;

C4[1][2][4][1] = 0 ;

C4[1][2][4][2] = 0 ;

C4[1][2][4][3] = 0 ;

C4[1][2][4][4] = 0 ;

C4[1][3][0][0] = 0 ;

C4[1][3][0][1] = 0 ;

C4[1][3][0][2] = 0 ;

C4[1][3][0][3] = 0 ;

C4[1][3][0][4] = 0 ;

C4[1][3][1][0] = 0 ;

C4[1][3][1][1] = 0 ;

C4[1][3][1][2] = 0 ;

C4[1][3][1][3] = (Power(a,2)*g*L*expl(S)*((2*Power(Lr,2))/Power(L,2) - (2*Lrr)/L - Power(Lr/L + Sr,2) - 2*Srr - (4*g*(2/a + ga/g + La/L + Sa)*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(Power(f,2)*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*(Lr/L + Sr)*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(4.*(1 - Power(theta,2))) + (Power(a,2)*expl(A*Power(r,2) + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(f,2)*L*r*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(a*g*expl(S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(f,2)*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (expl(A*Power(r,2) + T)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(Power(f,2)*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[1][3][1][4] = 0 ;

C4[1][3][2][0] = 0 ;

C4[1][3][2][1] = 0 ;

C4[1][3][2][2] = 0 ;

C4[1][3][2][3] = (Power(a,2)*g*L*expl(S)*(-((2/a + ga/g + La/L + Sa)*(Lr/L + Sr))/4. + (La*Lr - L*(Lra + L*Sra))/(2.*Power(L,2)) - ((2/a + ga/g + La/L + Sa)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + ((Lr/L + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(1 - Power(theta,2)) + (Power(a,3)*F*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[1][3][2][4] = 0 ;

C4[1][3][3][0] = 0 ;

C4[1][3][3][1] = (Power(a,2)*F*g*r*expl(S)*((4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/f + (4*a*g*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/f + 2*Lr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*Sr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(Lr/L + Sr)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(-(Power(a,2)*f*F*g*(Lr + L*Sr)) - Power(a,2)*F*fr*g*r*(Lr + L*Sr) - Power(a,2)*f*Fr*g*r*(Lr + L*Sr) - Power(a,2)*f*F*g*r*(Lrr + Lr*Sr + L*Srr) + 4*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra)))*expl(A*Power(r,2) + T) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*g*expl(A*Power(r,2) + S + T)*(-4*expl(Power(a,2)*B + S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) - 2*a*fr*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*Lr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*Sr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*L*(Lr/L + Sr)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*(-(F*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) - Fr*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - F*r*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra))) + 4*fr*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Power(a,2)*Br + Sr)*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Lrr + Lr*Sr + L*Srr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(Power(f,2)*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,2)*expl(A*Power(r,2) + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(f,2)*L*r*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((a*g*expl(S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(f,2)*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (expl(A*Power(r,2) + T)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(Power(f,2)*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[1][3][3][2] = (a*expl(Power(a,2)*B + 2*S)*((4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/f + (4*a*g*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/f + 2*Lr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*Sr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(Lr/L + Sr)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(-(Power(a,2)*f*F*g*(Lr + L*Sr)) - Power(a,2)*F*fr*g*r*(Lr + L*Sr) - Power(a,2)*f*Fr*g*r*(Lr + L*Sr) - Power(a,2)*f*F*g*r*(Lrr + Lr*Sr + L*Srr) + 4*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra)))*expl(A*Power(r,2) + T) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*F*g*r*expl(S)*(-4*expl(Power(a,2)*B + S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) - 2*a*fr*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*Lr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*Sr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*L*(Lr/L + Sr)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*(-(F*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) - Fr*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - F*r*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra))) + 4*fr*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Power(a,2)*Br + Sr)*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Lrr + Lr*Sr + L*Srr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,3)*F*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[1][3][3][3] = 0 ;

C4[1][3][3][4] = 0 ;

C4[1][3][4][0] = 0 ;

C4[1][3][4][1] = 0 ;

C4[1][3][4][2] = 0 ;

C4[1][3][4][3] = 0 ;

C4[1][3][4][4] = 0 ;

C4[1][4][0][0] = 0 ;

C4[1][4][0][1] = 0 ;

C4[1][4][0][2] = 0 ;

C4[1][4][0][3] = 0 ;

C4[1][4][0][4] = 0 ;

C4[1][4][1][0] = 0 ;

C4[1][4][1][1] = 0 ;

C4[1][4][1][2] = 0 ;

C4[1][4][1][3] = 0 ;

C4[1][4][1][4] = (Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*((2*Power(Lr,2))/Power(L,2) - (2*Lrr)/L - Power(Lr/L + Sr,2) - 2*Srr - (4*g*(2/a + ga/g + La/L + Sa)*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(Power(f,2)*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*(Lr/L + Sr)*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/4. + (Power(a,2)*(1 - Power(theta,2))*expl(A*Power(r,2) + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(f,2)*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(a*g*(1 - Power(theta,2))*expl(S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(f,2)*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-1 + Power(theta,2))*expl(A*Power(r,2) + T)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(Power(f,2)*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[1][4][2][0] = 0 ;

C4[1][4][2][1] = 0 ;

C4[1][4][2][2] = 0 ;

C4[1][4][2][3] = 0 ;

C4[1][4][2][4] = Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(-((2/a + ga/g + La/L + Sa)*(Lr/L + Sr))/4. + (La*Lr - L*(Lra + L*Sra))/(2.*Power(L,2)) - ((2/a + ga/g + La/L + Sa)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + ((Lr/L + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + (Power(a,3)*F*(1 - Power(theta,2))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*(1 - Power(theta,2))*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*(-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[1][4][3][0] = 0 ;

C4[1][4][3][1] = 0 ;

C4[1][4][3][2] = 0 ;

C4[1][4][3][3] = 0 ;

C4[1][4][3][4] = 0 ;

C4[1][4][4][0] = 0 ;

C4[1][4][4][1] = (Power(a,2)*F*g*r*(-1 + Power(theta,2))*expl(S)*((4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/f + (4*a*g*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/f + 2*Lr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*Sr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(Lr/L + Sr)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(-(Power(a,2)*f*F*g*(Lr + L*Sr)) - Power(a,2)*F*fr*g*r*(Lr + L*Sr) - Power(a,2)*f*Fr*g*r*(Lr + L*Sr) - Power(a,2)*f*F*g*r*(Lrr + Lr*Sr + L*Srr) + 4*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra)))*expl(A*Power(r,2) + T) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*g*(-1 + Power(theta,2))*expl(A*Power(r,2) + S + T)*(-4*expl(Power(a,2)*B + S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) - 2*a*fr*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*Lr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*Sr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*L*(Lr/L + Sr)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*(-(F*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) - Fr*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - F*r*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra))) + 4*fr*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Power(a,2)*Br + Sr)*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Lrr + Lr*Sr + L*Srr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(Power(f,2)*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,2)*(1 - Power(theta,2))*expl(A*Power(r,2) + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(f,2)*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((a*g*(1 - Power(theta,2))*expl(S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(f,2)*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - ((-1 + Power(theta,2))*expl(A*Power(r,2) + T)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(Power(f,2)*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[1][4][4][2] = (a*(-1 + Power(theta,2))*expl(Power(a,2)*B + 2*S)*((4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/f + (4*a*g*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/f + 2*Lr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*Sr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(Lr/L + Sr)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(-(Power(a,2)*f*F*g*(Lr + L*Sr)) - Power(a,2)*F*fr*g*r*(Lr + L*Sr) - Power(a,2)*f*Fr*g*r*(Lr + L*Sr) - Power(a,2)*f*F*g*r*(Lrr + Lr*Sr + L*Srr) + 4*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra)))*expl(A*Power(r,2) + T) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*F*g*r*(-1 + Power(theta,2))*expl(S)*(-4*expl(Power(a,2)*B + S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) - 2*a*fr*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*Lr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*Sr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*L*(Lr/L + Sr)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*(-(F*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) - Fr*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - F*r*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra))) + 4*fr*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Power(a,2)*Br + Sr)*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Lrr + Lr*Sr + L*Srr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,3)*F*(1 - Power(theta,2))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*(1 - Power(theta,2))*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*(-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[1][4][4][3] = 0 ;

C4[1][4][4][4] = 0 ;

C4[2][0][0][0] = 0 ;

C4[2][0][0][1] = (a*f*F*Power(r,2)*expl(T)*(4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) - 2*ga*L*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*g*La*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*g*L*r*Ta*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + g*L*r*(La/L + Ta)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*g*L*r*(F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) + a*Fa*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) + a*F*(2*fr*La*r + f*(La*(2 + r*Tr) + r*(Lra + L*Tra))) - 4*(Aa*Power(r,2) + Ta)*(La + L*Ta)*expl(A*Power(r,2) + T) - 4*(Laa + La*Ta + L*Taa)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - (2*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*g*L*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*f*r*(-4*r*expl(Power(a,2)*B + S)*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T)) - 4*expl(Power(a,2)*B + S)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 2*La*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*Ta*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(La/L + Ta)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(F*g*Power(r,2)*(La + L*Ta) + a*Fa*g*Power(r,2)*(La + L*Ta) + a*F*ga*Power(r,2)*(La + L*Ta) + a*F*g*Power(r,2)*(Laa + La*Ta + L*Taa) - 4*(2*a*B + Power(a,2)*Ba + Sa)*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S) - 4*(2*fr*La*r + f*(La*(2 + r*Tr) + r*(Lra + L*Tra)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))*expl(A*Power(r,2) + 2*T))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-2*f*F*Power(r,2)*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (f*Power(r,2)*expl(T)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. - (a*f*F*Power(r,2)*expl(-S + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[2][0][0][2] = (a*Power(f,2)*F*Power(r,2)*expl(T)*(-4*r*expl(Power(a,2)*B + S)*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T)) - 4*expl(Power(a,2)*B + S)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 2*La*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*Ta*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(La/L + Ta)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(F*g*Power(r,2)*(La + L*Ta) + a*Fa*g*Power(r,2)*(La + L*Ta) + a*F*ga*Power(r,2)*(La + L*Ta) + a*F*g*Power(r,2)*(Laa + La*Ta + L*Taa) - 4*(2*a*B + Power(a,2)*Ba + Sa)*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S) - 4*(2*fr*La*r + f*(La*(2 + r*Tr) + r*(Lra + L*Tra)))*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*Power(f,2)*r*expl(Power(a,2)*B + S + T)*(4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) - 2*ga*L*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*g*La*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*g*L*r*Ta*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + g*L*r*(La/L + Ta)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*g*L*r*(F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) + a*Fa*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) + a*F*(2*fr*La*r + f*(La*(2 + r*Tr) + r*(Lra + L*Tra))) - 4*(Aa*Power(r,2) + Ta)*(La + L*Ta)*expl(A*Power(r,2) + T) - 4*(Laa + La*Ta + L*Taa)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - (2*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*g*L*r*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T))*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-8*Power(f,2)*r*expl(Power(a,2)*B + S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(a*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(f,2)*r*expl(T)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(a*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. - (4*Power(f,2)*r*expl(Power(a,2)*B + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(g,2)*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[2][0][0][3] = 0 ;

C4[2][0][0][4] = 0 ;

C4[2][0][1][0] = 2*Power(f,2)*L*Power(r,2)*expl(T)*((La*Lr)/Power(L,2) - Lra/L - (La/L + Ta)*(fr/f + (Lr/L + 2/r + Tr)/2.) - Tra - (2*(La + L*Ta)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (4*(fr/f + (Lr/L + 2/r + Tr)/2.)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + ((2*f*F*Power(r,2)*expl(T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (f*Power(r,2)*expl(T)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (a*f*F*Power(r,2)*expl(-S + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[2][0][1][1] = 0 ;

C4[2][0][1][2] = 0 ;

C4[2][0][1][3] = 0 ;

C4[2][0][1][4] = 0 ;

C4[2][0][2][0] = Power(f,2)*L*Power(r,2)*expl(T)*((2*Power(La,2))/Power(L,2) - (2*Laa)/L - Power(La/L + Ta,2) - 2*Taa + (8*f*(fr/f + (Lr/L + 2/r + Tr)/2.)*expl(Power(a,2)*B + S)*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)))/(g*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*(La/L + Ta)*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*L*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + ((8*Power(f,2)*r*expl(Power(a,2)*B + S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(a*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(f,2)*r*expl(T)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(a*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (4*Power(f,2)*r*expl(Power(a,2)*B + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(g,2)*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[2][0][2][1] = 0 ;

C4[2][0][2][2] = 0 ;

C4[2][0][2][3] = 0 ;

C4[2][0][2][4] = 0 ;

C4[2][0][3][0] = 0 ;

C4[2][0][3][1] = 0 ;

C4[2][0][3][2] = 0 ;

C4[2][0][3][3] = 0 ;

C4[2][0][3][4] = 0 ;

C4[2][0][4][0] = 0 ;

C4[2][0][4][1] = 0 ;

C4[2][0][4][2] = 0 ;

C4[2][0][4][3] = 0 ;

C4[2][0][4][4] = 0 ;

C4[2][1][0][0] = 0 ;

C4[2][1][0][1] = 0 ;

C4[2][1][0][2] = 0 ;

C4[2][1][0][3] = 0 ;

C4[2][1][0][4] = 0 ;

C4[2][1][1][0] = 0 ;

C4[2][1][1][1] = (4*expl(A*Power(r,2) + T)*((-4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/f + (4*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/f - 2*Lr*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*expl(Power(a,2)*B + S)*(-(a*f*F*(Lr + L*(Power(a,2)*Br + Sr))) - a*F*fr*r*(Lr + L*(Power(a,2)*Br + Sr)) - a*f*Fr*r*(Lr + L*(Power(a,2)*Br + Sr)) - a*f*F*r*(Lrr + Lr*(Power(a,2)*Br + Sr) + L*(Power(a,2)*Brr + Srr)) + 4*(La + L*(Aa*Power(r,2) + Ta))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T) + 4*(Lra + Lr*(Aa*Power(r,2) + Ta) + L*(2*Aa*r + Ara*Power(r,2) + Tra))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + (La*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f + (L*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f - (L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*Fa*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*F*ga*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*F*g*r*(F*fr*L*r + a*Fa*fr*L*r + a*F*fr*La*r - f*(Fr*L*r + F*(L + Lr*r)) - a*f*(Fra*L*r + Fr*La*r + Fa*(L + Lr*r) + F*(La + Lra*r)) + 2*(Aa*Power(r,2) + Ta)*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T) + 2*(Laa + La*(Aa*Power(r,2) + Ta) + L*(Aaa*Power(r,2) + Taa))*expl(A*Power(r,2) + T)) + 8*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(f*Lra + 2*Aa*f*L*r + 2*A*f*La*r + La*(-2*fr + f*(Ar*Power(r,2) + Tr)) + f*L*(Ara*Power(r,2) + Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f))/(Power(f,2)*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (4*a*F*r*expl(A*Power(r,2) + T)*(-2*expl(A*Power(r,2) + T)*(-(Power(a,2)*F*Fa*Power(g,2)*L*Power(r,2)*(La + L*(Aa*Power(r,2) + Ta))) + a*Power(F,2)*Power(g,2)*Power(r,2)*(-(a*Power(La,2)) + L*(a*Laa + La*(-1 + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(a*Aaa*Power(r,2) + a*Power(Aa,2)*Power(r,4) - Ta + a*Power(Ta,2) + Aa*Power(r,2)*(-1 + 2*a*Ta) + a*Taa)) + 16*a*B*g*L*(La + L*(Aa*Power(r,2) + Ta))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(-2*g*Power(La,2) + L*(ga*La + g*(2*Laa + La*(-(Power(a,2)*Ba) + Aa*Power(r,2) - Sa + Ta))) + Power(L,2)*(ga*(Aa*Power(r,2) + Ta) + g*(2*Aaa*Power(r,2) + Power(Aa,2)*Power(r,4) - Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta) - Power(a,2)*Ba*Ta - Sa*Ta + Power(Ta,2) + 2*Taa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(f,2)*expl(Power(a,2)*B + S)*(-(Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr + L*(Power(a,2)*Br + Sr))) + Power(a,2)*Power(F,2)*g*r*(-(Power(Lr,2)*r) + L*(Lrr*r + Lr*(-1 + Power(a,2)*Br*r + r*Sr)) + Power(L,2)*(Power(a,4)*Power(Br,2)*r + Power(a,2)*Brr*r - Sr + r*Power(Sr,2) + Power(a,2)*Br*(-1 + 2*r*Sr) + r*Srr)) + 16*A*L*r*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(2*Power(Lr,2) + L*Lr*(-(Power(a,2)*Br) + Ar*Power(r,2) - Sr + Tr) + L*(-2*Lrr + L*(-(Power(a,4)*Power(Br,2)) - 2*Power(a,2)*Brr - Power(Sr,2) + Ar*Power(r,2)*(Power(a,2)*Br + Sr) - 2*Srr + Sr*Tr + Power(a,2)*Br*(-2*Sr + Tr))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*(Power(a,3)*Power(F,3)*Power(g,2)*(-(La*Lr) + L*Lra)*Power(r,3) - Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*Fra*g*L*r) + 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 8*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(4*a*La*Lr*r + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) + a*Aa*Power(r,3)*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr - a*r*Sa*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)) + L*(r*(-4*a*Lra + Lr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa + a*Ta)) + a*La*(-2 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(Power(f,3)*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[2][1][1][2] = (a*F*r*((-4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/f + (4*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/f - 2*Lr*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*expl(Power(a,2)*B + S)*(-(a*f*F*(Lr + L*(Power(a,2)*Br + Sr))) - a*F*fr*r*(Lr + L*(Power(a,2)*Br + Sr)) - a*f*Fr*r*(Lr + L*(Power(a,2)*Br + Sr)) - a*f*F*r*(Lrr + Lr*(Power(a,2)*Br + Sr) + L*(Power(a,2)*Brr + Srr)) + 4*(La + L*(Aa*Power(r,2) + Ta))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T) + 4*(Lra + Lr*(Aa*Power(r,2) + Ta) + L*(2*Aa*r + Ara*Power(r,2) + Tra))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + (La*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f + (L*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f - (L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*Fa*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*F*ga*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + a*F*g*r*(F*fr*L*r + a*Fa*fr*L*r + a*F*fr*La*r - f*(Fr*L*r + F*(L + Lr*r)) - a*f*(Fra*L*r + Fr*La*r + Fa*(L + Lr*r) + F*(La + Lra*r)) + 2*(Aa*Power(r,2) + Ta)*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T) + 2*(Laa + La*(Aa*Power(r,2) + Ta) + L*(Aaa*Power(r,2) + Taa))*expl(A*Power(r,2) + T)) + 8*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(f*Lra + 2*Aa*f*L*r + 2*A*f*La*r + La*(-2*fr + f*(Ar*Power(r,2) + Tr)) + f*L*(Ara*Power(r,2) + Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/f))/(f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (16*expl(Power(a,2)*B + A*Power(r,2) + S + T)*(-2*expl(A*Power(r,2) + T)*(-(Power(a,2)*F*Fa*Power(g,2)*L*Power(r,2)*(La + L*(Aa*Power(r,2) + Ta))) + a*Power(F,2)*Power(g,2)*Power(r,2)*(-(a*Power(La,2)) + L*(a*Laa + La*(-1 + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(a*Aaa*Power(r,2) + a*Power(Aa,2)*Power(r,4) - Ta + a*Power(Ta,2) + Aa*Power(r,2)*(-1 + 2*a*Ta) + a*Taa)) + 16*a*B*g*L*(La + L*(Aa*Power(r,2) + Ta))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(-2*g*Power(La,2) + L*(ga*La + g*(2*Laa + La*(-(Power(a,2)*Ba) + Aa*Power(r,2) - Sa + Ta))) + Power(L,2)*(ga*(Aa*Power(r,2) + Ta) + g*(2*Aaa*Power(r,2) + Power(Aa,2)*Power(r,4) - Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta) - Power(a,2)*Ba*Ta - Sa*Ta + Power(Ta,2) + 2*Taa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(f,2)*expl(Power(a,2)*B + S)*(-(Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr + L*(Power(a,2)*Br + Sr))) + Power(a,2)*Power(F,2)*g*r*(-(Power(Lr,2)*r) + L*(Lrr*r + Lr*(-1 + Power(a,2)*Br*r + r*Sr)) + Power(L,2)*(Power(a,4)*Power(Br,2)*r + Power(a,2)*Brr*r - Sr + r*Power(Sr,2) + Power(a,2)*Br*(-1 + 2*r*Sr) + r*Srr)) + 16*A*L*r*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(2*Power(Lr,2) + L*Lr*(-(Power(a,2)*Br) + Ar*Power(r,2) - Sr + Tr) + L*(-2*Lrr + L*(-(Power(a,4)*Power(Br,2)) - 2*Power(a,2)*Brr - Power(Sr,2) + Ar*Power(r,2)*(Power(a,2)*Br + Sr) - 2*Srr + Sr*Tr + Power(a,2)*Br*(-2*Sr + Tr))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*(Power(a,3)*Power(F,3)*Power(g,2)*(-(La*Lr) + L*Lra)*Power(r,3) - Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*Fra*g*L*r) + 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 8*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(4*a*La*Lr*r + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) + a*Aa*Power(r,3)*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr - a*r*Sa*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)) + L*(r*(-4*a*Lra + Lr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa + a*Ta)) + a*La*(-2 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(Power(f,2)*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((expl(A*Power(r,2) + T)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(a*Power(f,2)*g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*r*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(2.*Power(f,2)*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (expl(Power(a,2)*B + S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(a*Power(f,2)*g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (expl(-S)*((Power(a,2)*Power(F,2)*Power(L,2)*Power(r,2))/Power(f,2) - (16*Power(L,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(Power(f,2)*g))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*g*Power(L,3)*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[2][1][1][3] = 0 ;

C4[2][1][1][4] = 0 ;

C4[2][1][2][0] = 0 ;

C4[2][1][2][1] = (a*F*r*((4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (4*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (2*La*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*L*(Aa*Power(r,2) + Ta)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*L*(F*g*r*(La + L*(Aa*Power(r,2) + Ta)) + a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) + a*F*ga*r*(La + L*(Aa*Power(r,2) + Ta)) + a*F*g*r*(Laa + La*(Aa*Power(r,2) + Ta) + L*(Aaa*Power(r,2) + Taa)) - 4*f*(2*a*B + Power(a,2)*Ba + Sa)*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 4*f*(Lra + La*(Power(a,2)*Br + Sr) + L*(2*a*Br + Power(a,2)*Bra + Sra))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (Lr*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*L*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (2*L*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(Power(a,2)*Power(F,2)*g*r + Power(a,2)*F*Fr*g*Power(r,2) - 8*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (L*(a*F*g*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + a*Fr*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + a*F*g*r*(g*(a*Fa*L + F*(L + a*La)) + g*(a*Fra*L + Fr*(L + a*La) + a*Fa*Lr + F*(Lr + a*Lra))*r - 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 2*f*(Power(a,2)*Br + Sr)*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 2*f*(Lrr + Lr*(Power(a,2)*Br + Sr) + L*(Power(a,2)*Brr + Srr))*expl(Power(a,2)*B + S)) - 8*(2*a*Br*g*L + 2*a*B*g*Lr + g*Lra + Lr*(-ga + g*(Power(a,2)*Ba + Sa)) + g*L*(Power(a,2)*Bra + Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(f*L) - (16*expl(Power(a,2)*B + A*Power(r,2) + S + T)*(-2*expl(A*Power(r,2) + T)*(-(Power(a,2)*F*Fa*Power(g,2)*L*Power(r,2)*(La + L*(Aa*Power(r,2) + Ta))) + a*Power(F,2)*Power(g,2)*Power(r,2)*(-(a*Power(La,2)) + L*(a*Laa + La*(-1 + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(a*Aaa*Power(r,2) + a*Power(Aa,2)*Power(r,4) - Ta + a*Power(Ta,2) + Aa*Power(r,2)*(-1 + 2*a*Ta) + a*Taa)) + 16*a*B*g*L*(La + L*(Aa*Power(r,2) + Ta))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(-2*g*Power(La,2) + L*(ga*La + g*(2*Laa + La*(-(Power(a,2)*Ba) + Aa*Power(r,2) - Sa + Ta))) + Power(L,2)*(ga*(Aa*Power(r,2) + Ta) + g*(2*Aaa*Power(r,2) + Power(Aa,2)*Power(r,4) - Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta) - Power(a,2)*Ba*Ta - Sa*Ta + Power(Ta,2) + 2*Taa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(f,2)*expl(Power(a,2)*B + S)*(-(Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr + L*(Power(a,2)*Br + Sr))) + Power(a,2)*Power(F,2)*g*r*(-(Power(Lr,2)*r) + L*(Lrr*r + Lr*(-1 + Power(a,2)*Br*r + r*Sr)) + Power(L,2)*(Power(a,4)*Power(Br,2)*r + Power(a,2)*Brr*r - Sr + r*Power(Sr,2) + Power(a,2)*Br*(-1 + 2*r*Sr) + r*Srr)) + 16*A*L*r*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(2*Power(Lr,2) + L*Lr*(-(Power(a,2)*Br) + Ar*Power(r,2) - Sr + Tr) + L*(-2*Lrr + L*(-(Power(a,4)*Power(Br,2)) - 2*Power(a,2)*Brr - Power(Sr,2) + Ar*Power(r,2)*(Power(a,2)*Br + Sr) - 2*Srr + Sr*Tr + Power(a,2)*Br*(-2*Sr + Tr))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*(Power(a,3)*Power(F,3)*Power(g,2)*(-(La*Lr) + L*Lra)*Power(r,3) - Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*Fra*g*L*r) + 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 8*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(4*a*La*Lr*r + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) + a*Aa*Power(r,3)*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr - a*r*Sa*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)) + L*(r*(-4*a*Lra + Lr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa + a*Ta)) + a*La*(-2 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(Power(f,2)*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-((expl(A*Power(r,2) + T)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(a*Power(f,2)*g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2))) + (a*F*r*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(2.*Power(f,2)*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (expl(Power(a,2)*B + S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(a*Power(f,2)*g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. + (expl(-S)*(-((Power(a,2)*Power(F,2)*Power(L,2)*Power(r,2))/Power(f,2)) + (16*Power(L,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(Power(f,2)*g))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*g*Power(L,3)*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[2][1][2][2] = (4*expl(Power(a,2)*B + S)*((4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (4*(2*a*Fa*g*L*r + F*r*(a*ga*L - g*(-(a*La) + L*(-2 + a*(2*a*B + Power(a,2)*Ba + Sa)))) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T))*expl(Power(a,2)*B + A*Power(r,2) + S + T))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (2*La*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*L*(Aa*Power(r,2) + Ta)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*L*(F*g*r*(La + L*(Aa*Power(r,2) + Ta)) + a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) + a*F*ga*r*(La + L*(Aa*Power(r,2) + Ta)) + a*F*g*r*(Laa + La*(Aa*Power(r,2) + Ta) + L*(Aaa*Power(r,2) + Taa)) - 4*f*(2*a*B + Power(a,2)*Ba + Sa)*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 4*f*(Lra + La*(Power(a,2)*Br + Sr) + L*(2*a*Br + Power(a,2)*Bra + Sra))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (Lr*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*L*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-2*a*Power(F,2)*g*Power(r,2) - 2*Power(a,2)*F*Fa*g*Power(r,2) - Power(a,2)*Power(F,2)*ga*Power(r,2) + 16*(2*a*B + Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (2*L*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))*(Power(a,2)*Power(F,2)*g*r + Power(a,2)*F*Fr*g*Power(r,2) - 8*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (L*(a*F*g*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + a*Fr*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + a*F*g*r*(g*(a*Fa*L + F*(L + a*La)) + g*(a*Fra*L + Fr*(L + a*La) + a*Fa*Lr + F*(Lr + a*Lra))*r - 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 2*f*(Power(a,2)*Br + Sr)*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S) - 2*f*(Lrr + Lr*(Power(a,2)*Br + Sr) + L*(Power(a,2)*Brr + Srr))*expl(Power(a,2)*B + S)) - 8*(2*a*Br*g*L + 2*a*B*g*Lr + g*Lra + Lr*(-ga + g*(Power(a,2)*Ba + Sa)) + g*L*(Power(a,2)*Bra + Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(g*L) - (4*a*F*r*expl(Power(a,2)*B + S)*(-2*expl(A*Power(r,2) + T)*(-(Power(a,2)*F*Fa*Power(g,2)*L*Power(r,2)*(La + L*(Aa*Power(r,2) + Ta))) + a*Power(F,2)*Power(g,2)*Power(r,2)*(-(a*Power(La,2)) + L*(a*Laa + La*(-1 + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(a*Aaa*Power(r,2) + a*Power(Aa,2)*Power(r,4) - Ta + a*Power(Ta,2) + Aa*Power(r,2)*(-1 + 2*a*Ta) + a*Taa)) + 16*a*B*g*L*(La + L*(Aa*Power(r,2) + Ta))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(-2*g*Power(La,2) + L*(ga*La + g*(2*Laa + La*(-(Power(a,2)*Ba) + Aa*Power(r,2) - Sa + Ta))) + Power(L,2)*(ga*(Aa*Power(r,2) + Ta) + g*(2*Aaa*Power(r,2) + Power(Aa,2)*Power(r,4) - Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta) - Power(a,2)*Ba*Ta - Sa*Ta + Power(Ta,2) + 2*Taa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(f,2)*expl(Power(a,2)*B + S)*(-(Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr + L*(Power(a,2)*Br + Sr))) + Power(a,2)*Power(F,2)*g*r*(-(Power(Lr,2)*r) + L*(Lrr*r + Lr*(-1 + Power(a,2)*Br*r + r*Sr)) + Power(L,2)*(Power(a,4)*Power(Br,2)*r + Power(a,2)*Brr*r - Sr + r*Power(Sr,2) + Power(a,2)*Br*(-1 + 2*r*Sr) + r*Srr)) + 16*A*L*r*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(2*Power(Lr,2) + L*Lr*(-(Power(a,2)*Br) + Ar*Power(r,2) - Sr + Tr) + L*(-2*Lrr + L*(-(Power(a,4)*Power(Br,2)) - 2*Power(a,2)*Brr - Power(Sr,2) + Ar*Power(r,2)*(Power(a,2)*Br + Sr) - 2*Srr + Sr*Tr + Power(a,2)*Br*(-2*Sr + Tr))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + f*(Power(a,3)*Power(F,3)*Power(g,2)*(-(La*Lr) + L*Lra)*Power(r,3) - Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*Fra*g*L*r) + 2*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 8*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(4*a*La*Lr*r + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) + a*Aa*Power(r,3)*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr - a*r*Sa*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)) + L*(r*(-4*a*Lra + Lr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa + a*Ta)) + a*La*(-2 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(f*g*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) ;

C4[2][1][2][3] = 0 ;

C4[2][1][2][4] = 0 ;

C4[2][1][3][0] = 0 ;

C4[2][1][3][1] = 0 ;

C4[2][1][3][2] = 0 ;

C4[2][1][3][3] = 0 ;

C4[2][1][3][4] = 0 ;

C4[2][1][4][0] = 0 ;

C4[2][1][4][1] = 0 ;

C4[2][1][4][2] = 0 ;

C4[2][1][4][3] = 0 ;

C4[2][1][4][4] = 0 ;

C4[2][2][0][0] = 0 ;

C4[2][2][0][1] = 0 ;

C4[2][2][0][2] = 0 ;

C4[2][2][0][3] = 0 ;

C4[2][2][0][4] = 0 ;

C4[2][2][1][0] = 0 ;

C4[2][2][1][1] = 0 ;

C4[2][2][1][2] = 0 ;

C4[2][2][1][3] = 0 ;

C4[2][2][1][4] = 0 ;

C4[2][2][2][0] = 0 ;

C4[2][2][2][1] = 0 ;

C4[2][2][2][2] = 0 ;

C4[2][2][2][3] = 0 ;

C4[2][2][2][4] = 0 ;

C4[2][2][3][0] = 0 ;

C4[2][2][3][1] = 0 ;

C4[2][2][3][2] = 0 ;

C4[2][2][3][3] = 0 ;

C4[2][2][3][4] = 0 ;

C4[2][2][4][0] = 0 ;

C4[2][2][4][1] = 0 ;

C4[2][2][4][2] = 0 ;

C4[2][2][4][3] = 0 ;

C4[2][2][4][4] = 0 ;

C4[2][3][0][0] = 0 ;

C4[2][3][0][1] = 0 ;

C4[2][3][0][2] = 0 ;

C4[2][3][0][3] = 0 ;

C4[2][3][0][4] = 0 ;

C4[2][3][1][0] = 0 ;

C4[2][3][1][1] = 0 ;

C4[2][3][1][2] = 0 ;

C4[2][3][1][3] = (Power(a,2)*g*L*expl(S)*(-((2/a + ga/g + La/L + Sa)*(Lr/L + Sr))/4. + (La*Lr - L*(Lra + L*Sra))/(2.*Power(L,2)) - ((2/a + ga/g + La/L + Sa)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + ((Lr/L + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(1 - Power(theta,2)) + (Power(a,3)*F*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[2][3][1][4] = 0 ;

C4[2][3][2][0] = 0 ;

C4[2][3][2][1] = 0 ;

C4[2][3][2][2] = 0 ;

C4[2][3][2][3] = (Power(a,2)*g*L*expl(S)*(-Power(2/a + ga/g + La/L + Sa,2) + 2*(2/Power(a,2) + Power(ga,2)/Power(g,2) - gaa/g + Power(La,2)/Power(L,2) - Laa/L - Saa) - (4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)*(-2*a*Fa*g*L*r + F*r*(-(a*ga*L) + g*(-(a*La) + L*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa))) + 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)))/(g*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*(2/a + ga/g + La/L + Sa)*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*L*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(4.*(1 - Power(theta,2))) + (Power(a,2)*expl(Power(a,2)*B + S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*r*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(a*expl(S)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (expl(Power(a,2)*B + S)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(g*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[2][3][2][4] = 0 ;

C4[2][3][3][0] = 0 ;

C4[2][3][3][1] = (Power(a,2)*F*g*r*expl(S)*(-(Power(a,3)*f*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr + L*Sr) + g*(-(a*La*Lr) + L*(Lr*(2 + a*Sa) + a*(2*Lra + La*Sr)) + Power(L,2)*((2 + a*Sa)*Sr + 2*a*Sra)))) - 8*a*F*r*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-2*a*ga*L*(Lr + L*Sr) + g*(a*La*Lr + L*(-(a*(2*Lra + La*Sr)) + Lr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(-2*a*Sra + Sr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta))))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 4*a*Power(F,2)*Power(r,2)*(-(Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T)) + Power(g,2)*(-2*Power(a,2)*Power(La,2) + Power(a,2)*L*(2*Laa + La*(Aa*Power(r,2) + Sa + Ta)) + Power(L,2)*(Power(a,2)*Power(Sa,2) + a*Aa*Power(r,2)*(2 + a*Sa) + a*Sa*(2 + a*Ta) + 2*(-2 + Power(a,2)*Saa + a*Ta)))*expl(A*Power(r,2) + T) + a*g*(a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + a*L*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + ga*La*expl(A*Power(r,2) + T)) + Power(L,2)*(ga*(2 + a*Aa*Power(r,2) + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + a*(Power(f,2)*Sr*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))))) + 32*a*B*L*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*(-2*a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fa*g*r*Sr - 2*Power(a,3)*Br*Power(f,2)*Sr*expl(Power(a,2)*B + S) - 2*a*Power(f,2)*Power(Sr,2)*expl(Power(a,2)*B + S) + 4*Power(a,2)*Ba*g*expl(A*Power(r,2) + T) - 4*a*gaa*expl(A*Power(r,2) + T) - 4*g*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*g*Sa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba - 2*a*Sa)*expl(A*Power(r,2) + T) - 4*a*g*Saa*expl(A*Power(r,2) + T)) + L*(-2*a*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + 2*ga*La*expl(A*Power(r,2) + T)) + g*(2*(-2 + Power(a,3)*Ba)*La*expl(A*Power(r,2) + T) + a*(a*f*Fa*Lr*r - 4*Laa*expl(A*Power(r,2) + T)))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*expl(A*Power(r,2) + S + T)*(-(a*Power(F,3)*g*Power(r,3)*(-(Power(a,2)*Power(ga,2)*Power(L,2)) + 2*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-3*Power(a,2)*Power(La,2) + 2*a*L*(-La + a*Laa) + Power(L,2)*(-4 + 2*a*Sa + Power(a,2)*Power(Sa,2) + 2*Power(a,2)*Saa)))) + 2*a*Power(F,2)*g*Power(r,2)*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-(a*ga*L*(Lr + L*(Power(a,2)*Br + Sr))) + g*(-3*a*La*Lr + L*(Lr*(-2 + Power(a,3)*Ba + a*Sa) - a*(-2*Lra + La*(Power(a,2)*Br + Sr))) + Power(L,2)*(-(Power(a,2)*Br*(2 + a*Sa)) + (-2 + Power(a,3)*Ba + a*Sa)*Sr + 2*a*Sra)))*expl(Power(a,2)*B + S)) + 8*a*B*F*g*L*r*expl(Power(a,2)*B + S)*(-4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*r*Sr - 8*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T)))) - 8*F*g*r*expl(Power(a,2)*B + S)*(6*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba + a*Aa*Power(r,2) - 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*f*Fa*r*Sr - 4*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + 4*Ta*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T))) + a*L*(-2*ga*La*expl(A*Power(r,2) + T) - g*(-(a*f*Fa*Lr*r) + 4*Laa*expl(A*Power(r,2) + T) - 2*La*(Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(A*Power(r,2) + T)))) + 64*f*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)))/(f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,3)*F*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[2][3][3][2] = (a*expl(Power(a,2)*B + 2*S)*(-(Power(a,3)*f*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr + L*Sr) + g*(-(a*La*Lr) + L*(Lr*(2 + a*Sa) + a*(2*Lra + La*Sr)) + Power(L,2)*((2 + a*Sa)*Sr + 2*a*Sra)))) - 8*a*F*r*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-2*a*ga*L*(Lr + L*Sr) + g*(a*La*Lr + L*(-(a*(2*Lra + La*Sr)) + Lr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(-2*a*Sra + Sr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta))))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 4*a*Power(F,2)*Power(r,2)*(-(Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T)) + Power(g,2)*(-2*Power(a,2)*Power(La,2) + Power(a,2)*L*(2*Laa + La*(Aa*Power(r,2) + Sa + Ta)) + Power(L,2)*(Power(a,2)*Power(Sa,2) + a*Aa*Power(r,2)*(2 + a*Sa) + a*Sa*(2 + a*Ta) + 2*(-2 + Power(a,2)*Saa + a*Ta)))*expl(A*Power(r,2) + T) + a*g*(a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + a*L*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + ga*La*expl(A*Power(r,2) + T)) + Power(L,2)*(ga*(2 + a*Aa*Power(r,2) + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + a*(Power(f,2)*Sr*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))))) + 32*a*B*L*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*(-2*a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fa*g*r*Sr - 2*Power(a,3)*Br*Power(f,2)*Sr*expl(Power(a,2)*B + S) - 2*a*Power(f,2)*Power(Sr,2)*expl(Power(a,2)*B + S) + 4*Power(a,2)*Ba*g*expl(A*Power(r,2) + T) - 4*a*gaa*expl(A*Power(r,2) + T) - 4*g*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*g*Sa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba - 2*a*Sa)*expl(A*Power(r,2) + T) - 4*a*g*Saa*expl(A*Power(r,2) + T)) + L*(-2*a*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + 2*ga*La*expl(A*Power(r,2) + T)) + g*(2*(-2 + Power(a,3)*Ba)*La*expl(A*Power(r,2) + T) + a*(a*f*Fa*Lr*r - 4*Laa*expl(A*Power(r,2) + T)))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,3)*F*r*expl(S)*(-(a*Power(F,3)*g*Power(r,3)*(-(Power(a,2)*Power(ga,2)*Power(L,2)) + 2*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-3*Power(a,2)*Power(La,2) + 2*a*L*(-La + a*Laa) + Power(L,2)*(-4 + 2*a*Sa + Power(a,2)*Power(Sa,2) + 2*Power(a,2)*Saa)))) + 2*a*Power(F,2)*g*Power(r,2)*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-(a*ga*L*(Lr + L*(Power(a,2)*Br + Sr))) + g*(-3*a*La*Lr + L*(Lr*(-2 + Power(a,3)*Ba + a*Sa) - a*(-2*Lra + La*(Power(a,2)*Br + Sr))) + Power(L,2)*(-(Power(a,2)*Br*(2 + a*Sa)) + (-2 + Power(a,3)*Ba + a*Sa)*Sr + 2*a*Sra)))*expl(Power(a,2)*B + S)) + 8*a*B*F*g*L*r*expl(Power(a,2)*B + S)*(-4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*r*Sr - 8*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T)))) - 8*F*g*r*expl(Power(a,2)*B + S)*(6*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba + a*Aa*Power(r,2) - 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*f*Fa*r*Sr - 4*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + 4*Ta*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T))) + a*L*(-2*ga*La*expl(A*Power(r,2) + T) - g*(-(a*f*Fa*Lr*r) + 4*Laa*expl(A*Power(r,2) + T) - 2*La*(Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(A*Power(r,2) + T)))) + 64*f*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)))/(4.*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,2)*expl(Power(a,2)*B + S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*r*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((a*expl(S)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (expl(Power(a,2)*B + S)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(g*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[2][3][3][3] = 0 ;

C4[2][3][3][4] = 0 ;

C4[2][3][4][0] = 0 ;

C4[2][3][4][1] = 0 ;

C4[2][3][4][2] = 0 ;

C4[2][3][4][3] = 0 ;

C4[2][3][4][4] = 0 ;

C4[2][4][0][0] = 0 ;

C4[2][4][0][1] = 0 ;

C4[2][4][0][2] = 0 ;

C4[2][4][0][3] = 0 ;

C4[2][4][0][4] = 0 ;

C4[2][4][1][0] = 0 ;

C4[2][4][1][1] = 0 ;

C4[2][4][1][2] = 0 ;

C4[2][4][1][3] = 0 ;

C4[2][4][1][4] = Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(-((2/a + ga/g + La/L + Sa)*(Lr/L + Sr))/4. + (La*Lr - L*(Lra + L*Sra))/(2.*Power(L,2)) - ((2/a + ga/g + La/L + Sa)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + ((Lr/L + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + (Power(a,3)*F*(1 - Power(theta,2))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*(1 - Power(theta,2))*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*(-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[2][4][2][0] = 0 ;

C4[2][4][2][1] = 0 ;

C4[2][4][2][2] = 0 ;

C4[2][4][2][3] = 0 ;

C4[2][4][2][4] = (Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(-Power(2/a + ga/g + La/L + Sa,2) + 2*(2/Power(a,2) + Power(ga,2)/Power(g,2) - gaa/g + Power(La,2)/Power(L,2) - Laa/L - Saa) - (4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)*(-2*a*Fa*g*L*r + F*r*(-(a*ga*L) + g*(-(a*La) + L*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa))) + 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)))/(g*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (2*(2/a + ga/g + La/L + Sa)*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*L*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/4. + (Power(a,2)*(1 - Power(theta,2))*expl(Power(a,2)*B + S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(a*(1 - Power(theta,2))*expl(S)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-1 + Power(theta,2))*expl(Power(a,2)*B + S)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[2][4][3][0] = 0 ;

C4[2][4][3][1] = 0 ;

C4[2][4][3][2] = 0 ;

C4[2][4][3][3] = 0 ;

C4[2][4][3][4] = 0 ;

C4[2][4][4][0] = 0 ;

C4[2][4][4][1] = -(Power(a,2)*F*g*r*(-1 + Power(theta,2))*expl(S)*(Power(a,3)*f*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr + L*Sr) + g*(-(a*La*Lr) + L*(Lr*(2 + a*Sa) + a*(2*Lra + La*Sr)) + Power(L,2)*((2 + a*Sa)*Sr + 2*a*Sra))) + 8*a*F*r*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-2*a*ga*L*(Lr + L*Sr) + g*(a*La*Lr + L*(-(a*(2*Lra + La*Sr)) + Lr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(-2*a*Sra + Sr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta))))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) - 4*a*Power(F,2)*Power(r,2)*(-(Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T)) + Power(g,2)*(-2*Power(a,2)*Power(La,2) + Power(a,2)*L*(2*Laa + La*(Aa*Power(r,2) + Sa + Ta)) + Power(L,2)*(Power(a,2)*Power(Sa,2) + a*Aa*Power(r,2)*(2 + a*Sa) + a*Sa*(2 + a*Ta) + 2*(-2 + Power(a,2)*Saa + a*Ta)))*expl(A*Power(r,2) + T) + a*g*(a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + a*L*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + ga*La*expl(A*Power(r,2) + T)) + Power(L,2)*(ga*(2 + a*Aa*Power(r,2) + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + a*(Power(f,2)*Sr*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))))) - 32*a*B*L*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*(-2*a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fa*g*r*Sr - 2*Power(a,3)*Br*Power(f,2)*Sr*expl(Power(a,2)*B + S) - 2*a*Power(f,2)*Power(Sr,2)*expl(Power(a,2)*B + S) + 4*Power(a,2)*Ba*g*expl(A*Power(r,2) + T) - 4*a*gaa*expl(A*Power(r,2) + T) - 4*g*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*g*Sa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba - 2*a*Sa)*expl(A*Power(r,2) + T) - 4*a*g*Saa*expl(A*Power(r,2) + T)) + L*(-2*a*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + 2*ga*La*expl(A*Power(r,2) + T)) + g*(2*(-2 + Power(a,3)*Ba)*La*expl(A*Power(r,2) + T) + a*(a*f*Fa*Lr*r - 4*Laa*expl(A*Power(r,2) + T)))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*(-1 + Power(theta,2))*expl(A*Power(r,2) + S + T)*(-(a*Power(F,3)*g*Power(r,3)*(-(Power(a,2)*Power(ga,2)*Power(L,2)) + 2*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-3*Power(a,2)*Power(La,2) + 2*a*L*(-La + a*Laa) + Power(L,2)*(-4 + 2*a*Sa + Power(a,2)*Power(Sa,2) + 2*Power(a,2)*Saa)))) + 2*a*Power(F,2)*g*Power(r,2)*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-(a*ga*L*(Lr + L*(Power(a,2)*Br + Sr))) + g*(-3*a*La*Lr + L*(Lr*(-2 + Power(a,3)*Ba + a*Sa) - a*(-2*Lra + La*(Power(a,2)*Br + Sr))) + Power(L,2)*(-(Power(a,2)*Br*(2 + a*Sa)) + (-2 + Power(a,3)*Ba + a*Sa)*Sr + 2*a*Sra)))*expl(Power(a,2)*B + S)) + 8*a*B*F*g*L*r*expl(Power(a,2)*B + S)*(-4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*r*Sr - 8*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T)))) - 8*F*g*r*expl(Power(a,2)*B + S)*(6*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba + a*Aa*Power(r,2) - 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*f*Fa*r*Sr - 4*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + 4*Ta*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T))) + a*L*(-2*ga*La*expl(A*Power(r,2) + T) - g*(-(a*f*Fa*Lr*r) + 4*Laa*expl(A*Power(r,2) + T) - 2*La*(Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(A*Power(r,2) + T)))) + 64*f*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)))/(f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,3)*F*(1 - Power(theta,2))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*(1 - Power(theta,2))*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*(-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[2][4][4][2] = -((a*(-1 + Power(theta,2))*expl(Power(a,2)*B + 2*S)*(Power(a,3)*f*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr + L*Sr) + g*(-(a*La*Lr) + L*(Lr*(2 + a*Sa) + a*(2*Lra + La*Sr)) + Power(L,2)*((2 + a*Sa)*Sr + 2*a*Sra))) + 8*a*F*r*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-2*a*ga*L*(Lr + L*Sr) + g*(a*La*Lr + L*(-(a*(2*Lra + La*Sr)) + Lr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(-2*a*Sra + Sr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta))))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) - 4*a*Power(F,2)*Power(r,2)*(-(Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T)) + Power(g,2)*(-2*Power(a,2)*Power(La,2) + Power(a,2)*L*(2*Laa + La*(Aa*Power(r,2) + Sa + Ta)) + Power(L,2)*(Power(a,2)*Power(Sa,2) + a*Aa*Power(r,2)*(2 + a*Sa) + a*Sa*(2 + a*Ta) + 2*(-2 + Power(a,2)*Saa + a*Ta)))*expl(A*Power(r,2) + T) + a*g*(a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + a*L*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + ga*La*expl(A*Power(r,2) + T)) + Power(L,2)*(ga*(2 + a*Aa*Power(r,2) + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + a*(Power(f,2)*Sr*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))))) - 32*a*B*L*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*(-2*a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fa*g*r*Sr - 2*Power(a,3)*Br*Power(f,2)*Sr*expl(Power(a,2)*B + S) - 2*a*Power(f,2)*Power(Sr,2)*expl(Power(a,2)*B + S) + 4*Power(a,2)*Ba*g*expl(A*Power(r,2) + T) - 4*a*gaa*expl(A*Power(r,2) + T) - 4*g*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*g*Sa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba - 2*a*Sa)*expl(A*Power(r,2) + T) - 4*a*g*Saa*expl(A*Power(r,2) + T)) + L*(-2*a*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + 2*ga*La*expl(A*Power(r,2) + T)) + g*(2*(-2 + Power(a,3)*Ba)*La*expl(A*Power(r,2) + T) + a*(a*f*Fa*Lr*r - 4*Laa*expl(A*Power(r,2) + T)))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2))) + (Power(a,3)*F*r*(-1 + Power(theta,2))*expl(S)*(-(a*Power(F,3)*g*Power(r,3)*(-(Power(a,2)*Power(ga,2)*Power(L,2)) + 2*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-3*Power(a,2)*Power(La,2) + 2*a*L*(-La + a*Laa) + Power(L,2)*(-4 + 2*a*Sa + Power(a,2)*Power(Sa,2) + 2*Power(a,2)*Saa)))) + 2*a*Power(F,2)*g*Power(r,2)*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-(a*ga*L*(Lr + L*(Power(a,2)*Br + Sr))) + g*(-3*a*La*Lr + L*(Lr*(-2 + Power(a,3)*Ba + a*Sa) - a*(-2*Lra + La*(Power(a,2)*Br + Sr))) + Power(L,2)*(-(Power(a,2)*Br*(2 + a*Sa)) + (-2 + Power(a,3)*Ba + a*Sa)*Sr + 2*a*Sra)))*expl(Power(a,2)*B + S)) + 8*a*B*F*g*L*r*expl(Power(a,2)*B + S)*(-4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*r*Sr - 8*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T)))) - 8*F*g*r*expl(Power(a,2)*B + S)*(6*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba + a*Aa*Power(r,2) - 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*f*Fa*r*Sr - 4*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + 4*Ta*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T))) + a*L*(-2*ga*La*expl(A*Power(r,2) + T) - g*(-(a*f*Fa*Lr*r) + 4*Laa*expl(A*Power(r,2) + T) - 2*La*(Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(A*Power(r,2) + T)))) + 64*f*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)))/(4.*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,2)*(1 - Power(theta,2))*expl(Power(a,2)*B + S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((a*(1 - Power(theta,2))*expl(S)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - ((-1 + Power(theta,2))*expl(Power(a,2)*B + S)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[2][4][4][3] = 0 ;

C4[2][4][4][4] = 0 ;

C4[3][0][0][0] = 0 ;

C4[3][0][0][1] = 0 ;

C4[3][0][0][2] = 0 ;

C4[3][0][0][3] = (Power(a,2)*Power(f,2)*g*r*(-(f*(Lr/L + Sr)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))) - g*r*(2/a + ga/g + La/L + Sa)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T)))*expl(S + T))/((1 - Power(theta,2))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (Power(a,2)*Power(f,2)*r*expl(T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-2*a*Power(f,2)*g*r*expl(S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(f,2)*r*expl(T)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][0][0][4] = 0 ;

C4[3][0][1][0] = 0 ;

C4[3][0][1][1] = 0 ;

C4[3][0][1][2] = 0 ;

C4[3][0][1][3] = 0 ;

C4[3][0][1][4] = 0 ;

C4[3][0][2][0] = 0 ;

C4[3][0][2][1] = 0 ;

C4[3][0][2][2] = 0 ;

C4[3][0][2][3] = 0 ;

C4[3][0][2][4] = 0 ;

C4[3][0][3][0] = (a*Power(f,2)*g*Power(r,2)*(2*a*f*(fr/f + (Lr/L + 2/r + Tr)/2.)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)) + (La/L + Ta)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))*expl(S + T))/((-1 + Power(theta,2))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (Power(a,2)*Power(f,2)*r*expl(T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((2*a*Power(f,2)*g*r*expl(S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(f,2)*r*expl(T)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][0][3][1] = 0 ;

C4[3][0][3][2] = 0 ;

C4[3][0][3][3] = 0 ;

C4[3][0][3][4] = 0 ;

C4[3][0][4][0] = 0 ;

C4[3][0][4][1] = 0 ;

C4[3][0][4][2] = 0 ;

C4[3][0][4][3] = 0 ;

C4[3][0][4][4] = 0 ;

C4[3][1][0][0] = 0 ;

C4[3][1][0][1] = 0 ;

C4[3][1][0][2] = 0 ;

C4[3][1][0][3] = 0 ;

C4[3][1][0][4] = 0 ;

C4[3][1][1][0] = 0 ;

C4[3][1][1][1] = 0 ;

C4[3][1][1][2] = 0 ;

C4[3][1][1][3] = (Power(a,2)*g*L*expl(S)*(Power(Lr/L + Sr,2) + 2*(-(Power(Lr,2)/Power(L,2)) + Lrr/L + Srr) + (4*g*(2/a + ga/g + La/L + Sa)*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(Power(f,2)*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*(Lr/L + Sr)*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(4.*(1 - Power(theta,2))) - (Power(a,2)*expl(A*Power(r,2) + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(f,2)*L*r*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((a*g*expl(S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(f,2)*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (expl(A*Power(r,2) + T)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(Power(f,2)*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][1][1][4] = 0 ;

C4[3][1][2][0] = 0 ;

C4[3][1][2][1] = 0 ;

C4[3][1][2][2] = 0 ;

C4[3][1][2][3] = (Power(a,2)*g*L*expl(S)*(((2/a + ga/g + La/L + Sa)*(Lr/L + Sr))/4. + (-((La*Lr)/Power(L,2)) + Lra/L + Sra)/2. + ((2/a + ga/g + La/L + Sa)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - ((Lr/L + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(1 - Power(theta,2)) - (Power(a,3)*F*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][1][2][4] = 0 ;

C4[3][1][3][0] = 0 ;

C4[3][1][3][1] = (a*g*expl(A*Power(r,2) + S + T)*(4*expl(Power(a,2)*B + S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 2*a*fr*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*Lr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*Sr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*f*L*(Lr/L + Sr)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*(-(F*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) - Fr*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - F*r*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra))) + 4*fr*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Power(a,2)*Br + Sr)*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Lrr + Lr*Sr + L*Srr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(Power(f,2)*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,3)*F*g*r*expl(S)*(Power(a,3)*Power(F,3)*Power(g,2)*Power(r,2)*(2*fr*L*r*(Lr + L*Sr) + f*(-3*Power(Lr,2)*r - 2*L*(Lr - Lrr*r) + Power(L,2)*(-2*Sr + r*Power(Sr,2) + 2*r*Srr))) + 8*a*F*g*r*(6*f*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*A*f*L*r*(Lr + L*Sr)*expl(Power(a,2)*B + S) + L*(a*Fr*g*La*r - 4*fr*Lr*expl(Power(a,2)*B + S) - 2*f*(2*Lrr - Lr*(Power(a,2)*Br + Ar*Power(r,2) + Sr + Tr))*expl(Power(a,2)*B + S)) + Power(L,2)*(a*Fr*ga*r + Fr*g*r*(2 + a*Sa) - 2*(2*fr*Sr - f*(Power(a,2)*Br*Sr + Ar*Power(r,2)*Sr - 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) - 2*a*Power(F,2)*g*r*(2*a*ga*Power(L,2)*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)*expl(A*Power(r,2) + T) + g*(-6*a*La*Lr*r*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fr*Power(r,2)*Sr - 8*expl(A*Power(r,2) + T) + 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*A*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*r*Sr*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,3)*Sr*expl(A*Power(r,2) + T) + 4*a*r*Sra*expl(A*Power(r,2) + T) - 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + 4*r*Tr*expl(A*Power(r,2) + T) + 2*a*Sa*(-2 + Ar*Power(r,3) + r*Sr + r*Tr)*expl(A*Power(r,2) + T)) + a*L*(2*La*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + r*(4*Lra*expl(A*Power(r,2) + T) - Lr*(-(a*f*Fr*r) + 2*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 2*Ta*expl(A*Power(r,2) + T)))))) - 64*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*expl(A*Power(r,2) + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(f,2)*L*r*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(a*g*expl(S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(f,2)*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (expl(A*Power(r,2) + T)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(Power(f,2)*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][1][3][2] = (Power(a,2)*F*g*r*expl(S)*(4*expl(Power(a,2)*B + S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 2*a*fr*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*Lr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*Sr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*f*L*(Lr/L + Sr)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*(-(F*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) - Fr*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - F*r*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra))) + 4*fr*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Power(a,2)*Br + Sr)*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Lrr + Lr*Sr + L*Srr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*expl(Power(a,2)*B + 2*S)*(Power(a,3)*Power(F,3)*Power(g,2)*Power(r,2)*(2*fr*L*r*(Lr + L*Sr) + f*(-3*Power(Lr,2)*r - 2*L*(Lr - Lrr*r) + Power(L,2)*(-2*Sr + r*Power(Sr,2) + 2*r*Srr))) + 8*a*F*g*r*(6*f*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*A*f*L*r*(Lr + L*Sr)*expl(Power(a,2)*B + S) + L*(a*Fr*g*La*r - 4*fr*Lr*expl(Power(a,2)*B + S) - 2*f*(2*Lrr - Lr*(Power(a,2)*Br + Ar*Power(r,2) + Sr + Tr))*expl(Power(a,2)*B + S)) + Power(L,2)*(a*Fr*ga*r + Fr*g*r*(2 + a*Sa) - 2*(2*fr*Sr - f*(Power(a,2)*Br*Sr + Ar*Power(r,2)*Sr - 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) - 2*a*Power(F,2)*g*r*(2*a*ga*Power(L,2)*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Sr + r*Tr)*expl(A*Power(r,2) + T) + g*(-6*a*La*Lr*r*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fr*Power(r,2)*Sr - 8*expl(A*Power(r,2) + T) + 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*A*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*r*Sr*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,3)*Sr*expl(A*Power(r,2) + T) + 4*a*r*Sra*expl(A*Power(r,2) + T) - 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + 4*r*Tr*expl(A*Power(r,2) + T) + 2*a*Sa*(-2 + Ar*Power(r,3) + r*Sr + r*Tr)*expl(A*Power(r,2) + T)) + a*L*(2*La*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + r*(4*Lra*expl(A*Power(r,2) + T) - Lr*(-(a*f*Fr*r) + 2*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 2*Ta*expl(A*Power(r,2) + T)))))) - 64*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))/(L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,3)*F*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][1][3][3] = 0 ;

C4[3][1][3][4] = 0 ;

C4[3][1][4][0] = 0 ;

C4[3][1][4][1] = 0 ;

C4[3][1][4][2] = 0 ;

C4[3][1][4][3] = 0 ;

C4[3][1][4][4] = 0 ;

C4[3][2][0][0] = 0 ;

C4[3][2][0][1] = 0 ;

C4[3][2][0][2] = 0 ;

C4[3][2][0][3] = 0 ;

C4[3][2][0][4] = 0 ;

C4[3][2][1][0] = 0 ;

C4[3][2][1][1] = 0 ;

C4[3][2][1][2] = 0 ;

C4[3][2][1][3] = (Power(a,2)*g*L*expl(S)*(((2/a + ga/g + La/L + Sa)*(Lr/L + Sr))/4. + (-((La*Lr)/Power(L,2)) + Lra/L + Sra)/2. + ((2/a + ga/g + La/L + Sa)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - ((Lr/L + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(1 - Power(theta,2)) - (Power(a,3)*F*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][2][1][4] = 0 ;

C4[3][2][2][0] = 0 ;

C4[3][2][2][1] = 0 ;

C4[3][2][2][2] = 0 ;

C4[3][2][2][3] = (Power(a,2)*g*L*expl(S)*(Power(2/a + ga/g + La/L + Sa,2) + 2*(-2/Power(a,2) - Power(ga,2)/Power(g,2) + gaa/g - Power(La,2)/Power(L,2) + Laa/L + Saa) + (4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)*(-2*a*Fa*g*L*r + F*r*(-(a*ga*L) + g*(-(a*La) + L*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa))) + 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)))/(g*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*(2/a + ga/g + La/L + Sa)*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*L*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(4.*(1 - Power(theta,2))) - (Power(a,2)*expl(Power(a,2)*B + S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*r*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((a*expl(S)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (expl(Power(a,2)*B + S)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(g*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][2][2][4] = 0 ;

C4[3][2][3][0] = 0 ;

C4[3][2][3][1] = (Power(a,2)*F*g*r*expl(S)*(Power(a,3)*f*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr + L*Sr) + g*(-(a*La*Lr) + L*(Lr*(2 + a*Sa) + a*(2*Lra + La*Sr)) + Power(L,2)*((2 + a*Sa)*Sr + 2*a*Sra))) + 8*a*F*r*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-2*a*ga*L*(Lr + L*Sr) + g*(a*La*Lr + L*(-(a*(2*Lra + La*Sr)) + Lr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(-2*a*Sra + Sr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta))))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) - 4*a*Power(F,2)*Power(r,2)*(-(Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T)) + Power(g,2)*(-2*Power(a,2)*Power(La,2) + Power(a,2)*L*(2*Laa + La*(Aa*Power(r,2) + Sa + Ta)) + Power(L,2)*(Power(a,2)*Power(Sa,2) + a*Aa*Power(r,2)*(2 + a*Sa) + a*Sa*(2 + a*Ta) + 2*(-2 + Power(a,2)*Saa + a*Ta)))*expl(A*Power(r,2) + T) + a*g*(a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + a*L*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + ga*La*expl(A*Power(r,2) + T)) + Power(L,2)*(ga*(2 + a*Aa*Power(r,2) + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + a*(Power(f,2)*Sr*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))))) - 32*a*B*L*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*(-2*a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fa*g*r*Sr - 2*Power(a,3)*Br*Power(f,2)*Sr*expl(Power(a,2)*B + S) - 2*a*Power(f,2)*Power(Sr,2)*expl(Power(a,2)*B + S) + 4*Power(a,2)*Ba*g*expl(A*Power(r,2) + T) - 4*a*gaa*expl(A*Power(r,2) + T) - 4*g*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*g*Sa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba - 2*a*Sa)*expl(A*Power(r,2) + T) - 4*a*g*Saa*expl(A*Power(r,2) + T)) + L*(-2*a*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + 2*ga*La*expl(A*Power(r,2) + T)) + g*(2*(-2 + Power(a,3)*Ba)*La*expl(A*Power(r,2) + T) + a*(a*f*Fa*Lr*r - 4*Laa*expl(A*Power(r,2) + T)))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*expl(A*Power(r,2) + S + T)*(a*Power(F,3)*g*Power(r,3)*(-(Power(a,2)*Power(ga,2)*Power(L,2)) + 2*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-3*Power(a,2)*Power(La,2) + 2*a*L*(-La + a*Laa) + Power(L,2)*(-4 + 2*a*Sa + Power(a,2)*Power(Sa,2) + 2*Power(a,2)*Saa))) - 2*a*Power(F,2)*g*Power(r,2)*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-(a*ga*L*(Lr + L*(Power(a,2)*Br + Sr))) + g*(-3*a*La*Lr + L*(Lr*(-2 + Power(a,3)*Ba + a*Sa) - a*(-2*Lra + La*(Power(a,2)*Br + Sr))) + Power(L,2)*(-(Power(a,2)*Br*(2 + a*Sa)) + (-2 + Power(a,3)*Ba + a*Sa)*Sr + 2*a*Sra)))*expl(Power(a,2)*B + S)) + 8*a*B*F*g*L*r*expl(Power(a,2)*B + S)*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T)))) + 8*F*g*r*expl(Power(a,2)*B + S)*(6*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba + a*Aa*Power(r,2) - 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*f*Fa*r*Sr - 4*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + 4*Ta*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T))) + a*L*(-2*ga*La*expl(A*Power(r,2) + T) - g*(-(a*f*Fa*Lr*r) + 4*Laa*expl(A*Power(r,2) + T) - 2*La*(Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(A*Power(r,2) + T)))) - 64*f*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)))/(f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,3)*F*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][2][3][2] = (a*expl(Power(a,2)*B + 2*S)*(Power(a,3)*f*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr + L*Sr) + g*(-(a*La*Lr) + L*(Lr*(2 + a*Sa) + a*(2*Lra + La*Sr)) + Power(L,2)*((2 + a*Sa)*Sr + 2*a*Sra))) + 8*a*F*r*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-2*a*ga*L*(Lr + L*Sr) + g*(a*La*Lr + L*(-(a*(2*Lra + La*Sr)) + Lr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(-2*a*Sra + Sr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta))))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) - 4*a*Power(F,2)*Power(r,2)*(-(Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T)) + Power(g,2)*(-2*Power(a,2)*Power(La,2) + Power(a,2)*L*(2*Laa + La*(Aa*Power(r,2) + Sa + Ta)) + Power(L,2)*(Power(a,2)*Power(Sa,2) + a*Aa*Power(r,2)*(2 + a*Sa) + a*Sa*(2 + a*Ta) + 2*(-2 + Power(a,2)*Saa + a*Ta)))*expl(A*Power(r,2) + T) + a*g*(a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + a*L*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + ga*La*expl(A*Power(r,2) + T)) + Power(L,2)*(ga*(2 + a*Aa*Power(r,2) + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + a*(Power(f,2)*Sr*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))))) - 32*a*B*L*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*(-2*a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fa*g*r*Sr - 2*Power(a,3)*Br*Power(f,2)*Sr*expl(Power(a,2)*B + S) - 2*a*Power(f,2)*Power(Sr,2)*expl(Power(a,2)*B + S) + 4*Power(a,2)*Ba*g*expl(A*Power(r,2) + T) - 4*a*gaa*expl(A*Power(r,2) + T) - 4*g*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*g*Sa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba - 2*a*Sa)*expl(A*Power(r,2) + T) - 4*a*g*Saa*expl(A*Power(r,2) + T)) + L*(-2*a*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + 2*ga*La*expl(A*Power(r,2) + T)) + g*(2*(-2 + Power(a,3)*Ba)*La*expl(A*Power(r,2) + T) + a*(a*f*Fa*Lr*r - 4*Laa*expl(A*Power(r,2) + T)))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,3)*F*r*expl(S)*(a*Power(F,3)*g*Power(r,3)*(-(Power(a,2)*Power(ga,2)*Power(L,2)) + 2*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-3*Power(a,2)*Power(La,2) + 2*a*L*(-La + a*Laa) + Power(L,2)*(-4 + 2*a*Sa + Power(a,2)*Power(Sa,2) + 2*Power(a,2)*Saa))) - 2*a*Power(F,2)*g*Power(r,2)*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-(a*ga*L*(Lr + L*(Power(a,2)*Br + Sr))) + g*(-3*a*La*Lr + L*(Lr*(-2 + Power(a,3)*Ba + a*Sa) - a*(-2*Lra + La*(Power(a,2)*Br + Sr))) + Power(L,2)*(-(Power(a,2)*Br*(2 + a*Sa)) + (-2 + Power(a,3)*Ba + a*Sa)*Sr + 2*a*Sra)))*expl(Power(a,2)*B + S)) + 8*a*B*F*g*L*r*expl(Power(a,2)*B + S)*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T)))) + 8*F*g*r*expl(Power(a,2)*B + S)*(6*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba + a*Aa*Power(r,2) - 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*f*Fa*r*Sr - 4*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + 4*Ta*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T))) + a*L*(-2*ga*La*expl(A*Power(r,2) + T) - g*(-(a*f*Fa*Lr*r) + 4*Laa*expl(A*Power(r,2) + T) - 2*La*(Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(A*Power(r,2) + T)))) - 64*f*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)))/(4.*L*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*expl(Power(a,2)*B + S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*r*(1 - Power(theta,2))*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(a*expl(S)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (expl(Power(a,2)*B + S)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(g*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][2][3][3] = 0 ;

C4[3][2][3][4] = 0 ;

C4[3][2][4][0] = 0 ;

C4[3][2][4][1] = 0 ;

C4[3][2][4][2] = 0 ;

C4[3][2][4][3] = 0 ;

C4[3][2][4][4] = 0 ;

C4[3][3][0][0] = 0 ;

C4[3][3][0][1] = 0 ;

C4[3][3][0][2] = 0 ;

C4[3][3][0][3] = 0 ;

C4[3][3][0][4] = 0 ;

C4[3][3][1][0] = 0 ;

C4[3][3][1][1] = 0 ;

C4[3][3][1][2] = 0 ;

C4[3][3][1][3] = 0 ;

C4[3][3][1][4] = 0 ;

C4[3][3][2][0] = 0 ;

C4[3][3][2][1] = 0 ;

C4[3][3][2][2] = 0 ;

C4[3][3][2][3] = 0 ;

C4[3][3][2][4] = 0 ;

C4[3][3][3][0] = 0 ;

C4[3][3][3][1] = 0 ;

C4[3][3][3][2] = 0 ;

C4[3][3][3][3] = 0 ;

C4[3][3][3][4] = 0 ;

C4[3][3][4][0] = 0 ;

C4[3][3][4][1] = 0 ;

C4[3][3][4][2] = 0 ;

C4[3][3][4][3] = 0 ;

C4[3][3][4][4] = 0 ;

C4[3][4][0][0] = 0 ;

C4[3][4][0][1] = 0 ;

C4[3][4][0][2] = 0 ;

C4[3][4][0][3] = 0 ;

C4[3][4][0][4] = 0 ;

C4[3][4][1][0] = 0 ;

C4[3][4][1][1] = 0 ;

C4[3][4][1][2] = 0 ;

C4[3][4][1][3] = 0 ;

C4[3][4][1][4] = 0 ;

C4[3][4][2][0] = 0 ;

C4[3][4][2][1] = 0 ;

C4[3][4][2][2] = 0 ;

C4[3][4][2][3] = 0 ;

C4[3][4][2][4] = 0 ;

C4[3][4][3][0] = 0 ;

C4[3][4][3][1] = 0 ;

C4[3][4][3][2] = 0 ;

C4[3][4][3][3] = 0 ;

C4[3][4][3][4] = (Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(4 - 4*Power(theta,2) + (Power(a,2)*f*g*(Lr + L*Sr)*(-1 + Power(theta,2))*expl(S)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)))/(Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (a*g*(2/a + ga/g + La/L + Sa)*(-1 + Power(theta,2))*expl(S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(4.*Power(-1 + Power(theta,2),2)) + (Power(a,4)*g*expl(S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*g*(-1 + Power(theta,2))*expl(S)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,2)*g*(1 - Power(theta,2))*expl(S)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][4][4][0] = 0 ;

C4[3][4][4][1] = 0 ;

C4[3][4][4][2] = 0 ;

C4[3][4][4][3] = (Power(a,2)*g*L*expl(S)*(-1 + Power(theta,2) - (Power(a,2)*f*g*(Lr + L*Sr)*(-1 + Power(theta,2))*expl(S)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)))/(4.*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (a*g*(2/a + ga/g + La/L + Sa)*(-1 + Power(theta,2))*expl(S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/(4.*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(1 - Power(theta,2)) - (Power(a,4)*g*expl(S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*g*(-1 + Power(theta,2))*expl(S)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*g*(1 - Power(theta,2))*expl(S)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[3][4][4][4] = 0 ;

C4[4][0][0][0] = 0 ;

C4[4][0][0][1] = 0 ;

C4[4][0][0][2] = 0 ;

C4[4][0][0][3] = 0 ;

C4[4][0][0][4] = (Power(a,2)*Power(f,2)*g*r*(1 - Power(theta,2))*(-(f*(Lr/L + Sr)*(a*F*g*Power(r,2)*(La + L*Ta) - 4*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr)))*expl(Power(a,2)*B + S))) - g*r*(2/a + ga/g + La/L + Sa)*(a*F*(2*fr*L*r + f*(Lr*r + L*(2 + r*Tr))) - 4*(La + L*Ta)*expl(A*Power(r,2) + T)))*expl(S + T))/(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - (Power(a,2)*Power(f,2)*r*(1 - Power(theta,2))*expl(T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-2*a*Power(f,2)*g*r*(1 - Power(theta,2))*expl(S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(f,2)*r*(-1 + Power(theta,2))*expl(T)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][0][1][0] = 0 ;

C4[4][0][1][1] = 0 ;

C4[4][0][1][2] = 0 ;

C4[4][0][1][3] = 0 ;

C4[4][0][1][4] = 0 ;

C4[4][0][2][0] = 0 ;

C4[4][0][2][1] = 0 ;

C4[4][0][2][2] = 0 ;

C4[4][0][2][3] = 0 ;

C4[4][0][2][4] = 0 ;

C4[4][0][3][0] = 0 ;

C4[4][0][3][1] = 0 ;

C4[4][0][3][2] = 0 ;

C4[4][0][3][3] = 0 ;

C4[4][0][3][4] = 0 ;

C4[4][0][4][0] = (a*Power(f,2)*g*Power(r,2)*(-1 + Power(theta,2))*(2*a*f*(fr/f + (Lr/L + 2/r + Tr)/2.)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)) + (La/L + Ta)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))*expl(S + T))/(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + (Power(a,2)*Power(f,2)*r*(1 - Power(theta,2))*expl(T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((2*a*Power(f,2)*g*r*(1 - Power(theta,2))*expl(S + T)*(-16*a*A*f*L*r*(4*f*(Lr*r + L*(2 + r*Tr))*expl(Power(a,2)*B + S) - r*(a*F*g*La*r + L*(a*F*g*r*Ta - 8*fr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*a*Power(f,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*F*Fr*g*L*Power(r,2)*(Lr*r + L*(2 + r*Tr)) - Power(a,2)*Power(F,2)*g*r*(Power(Lr,2)*Power(r,2) + 2*L*r*(Lrr*r + Lr*(3 + Power(a,2)*Br*r + 2*r*Sr + 2*r*Tr)) + Power(L,2)*(-4 + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(2 + r*Tr) + 4*r*Sr*(2 + r*Tr) + 2*Power(r,2)*Trr)) - 16*(-(Power(Lr,2)*r) + L*(-2*Lrr*r + Lr*(-8 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 3*r*Tr)) + Power(L,2)*(-6*Sr - 2*Tr - 3*r*Sr*Tr - Power(a,2)*Br*(2 + r*Tr) + Ar*Power(r,2)*(2 + r*Tr) - 2*r*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + a*f*(Power(a,2)*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr*r + L*(2 + r*Tr)) + g*(a*La*Lr*r + L*(r*(2*a*Lra + Lr*(2 + a*Sa + 2*a*Ta)) + a*La*(4 + r*Sr + 2*r*Tr)) + Power(L,2)*(a*Sa*(2 + r*Tr) + a*Ta*(2 + r*Sr + r*Tr) + 2*(2 + r*Tr + a*r*Tra)))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(5*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*Power(a,2)*Br*r + 4*r*Sr + 3*r*Tr)))*expl(Power(a,2)*B + S) + 8*F*r*expl(Power(a,2)*B + S)*(-3*a*ga*L*(Lr*r + L*(2 + r*Tr))*expl(A*Power(r,2) + T) + g*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(r*(-4*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - 3*a*Ta)) + a*La*(-10 + Power(a,2)*Br*r + Ar*Power(r,3) - r*Sr - 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) - 6*r*Tr*expl(A*Power(r,2) + T) + Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) - a*r*Sa*Tr*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(2 + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)))) - 16*L*(r*(a*g*(Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) + r*(a*g*(Fr*r*Ta + Fa*(2 + r*Tr)) - 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*r*(-(Power(a,3)*Power(F,3)*fr*g*L*Power(r,3)*(a*ga*L + g*(2*a*La + L*(2 + a*Sa + a*Ta)))) - 2*a*F*L*r*(Power(a,2)*Fa*Power(g,2)*r*(La + L*Ta) - 12*a*fr*ga*L*expl(Power(a,2)*B + S) + 4*fr*g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + Power(a,2)*Power(F,2)*g*Power(r,2)*(a*g*Power(La,2)*expl(A*Power(r,2) + T) + 2*L*(a*ga*La + g*(a*Laa + La*(1 + a*Aa*Power(r,2) + a*Sa + 3*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*ga*Ta + g*(2*(1 + a*Aa*Power(r,2) + a*Sa)*Ta + 3*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T))) + 16*(-(a*g*Power(La,2)*expl(A*Power(r,2) + T)) + L*(-3*a*ga*La + g*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Aa*Power(r,2) - a*Sa - 5*a*Ta)))*expl(A*Power(r,2) + T) - Power(L,2)*(-(Power(a,2)*Fa*fr*g*r) + 4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (3*a*ga*Ta + g*((4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Aa*Power(r,2) + a*Sa)*Ta + 2*a*Power(Ta,2) + 2*a*Taa))*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(f,2)*r*(-1 + Power(theta,2))*expl(T)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][0][4][1] = 0 ;

C4[4][0][4][2] = 0 ;

C4[4][0][4][3] = 0 ;

C4[4][0][4][4] = 0 ;

C4[4][1][0][0] = 0 ;

C4[4][1][0][1] = 0 ;

C4[4][1][0][2] = 0 ;

C4[4][1][0][3] = 0 ;

C4[4][1][0][4] = 0 ;

C4[4][1][1][0] = 0 ;

C4[4][1][1][1] = 0 ;

C4[4][1][1][2] = 0 ;

C4[4][1][1][3] = 0 ;

C4[4][1][1][4] = (Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(Power(Lr/L + Sr,2) + 2*(-(Power(Lr,2)/Power(L,2)) + Lrr/L + Srr) + (4*g*(2/a + ga/g + La/L + Sa)*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + r*(2*A*r + Ar*Power(r,2) + Tr)))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(Power(f,2)*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*(Lr/L + Sr)*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/4. - (Power(a,2)*(1 - Power(theta,2))*expl(A*Power(r,2) + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(f,2)*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((a*g*(1 - Power(theta,2))*expl(S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(f,2)*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - ((-1 + Power(theta,2))*expl(A*Power(r,2) + T)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(Power(f,2)*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][1][2][0] = 0 ;

C4[4][1][2][1] = 0 ;

C4[4][1][2][2] = 0 ;

C4[4][1][2][3] = 0 ;

C4[4][1][2][4] = Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(((2/a + ga/g + La/L + Sa)*(Lr/L + Sr))/4. + (-((La*Lr)/Power(L,2)) + Lra/L + Sra)/2. + ((2/a + ga/g + La/L + Sa)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - ((Lr/L + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - (Power(a,3)*F*(1 - Power(theta,2))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*(1 - Power(theta,2))*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*(-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][1][3][0] = 0 ;

C4[4][1][3][1] = 0 ;

C4[4][1][3][2] = 0 ;

C4[4][1][3][3] = 0 ;

C4[4][1][3][4] = 0 ;

C4[4][1][4][0] = 0 ;

C4[4][1][4][1] = (Power(a,2)*F*g*r*(-1 + Power(theta,2))*expl(S)*((-4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/f + (4*a*g*(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/f - 2*Lr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*Sr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(Lr/L + Sr)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(-(Power(a,2)*f*F*g*(Lr + L*Sr)) - Power(a,2)*F*fr*g*r*(Lr + L*Sr) - Power(a,2)*f*Fr*g*r*(Lr + L*Sr) - Power(a,2)*f*F*g*r*(Lrr + Lr*Sr + L*Srr) + 4*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra)))*expl(A*Power(r,2) + T) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*g*(-1 + Power(theta,2))*expl(A*Power(r,2) + S + T)*(4*expl(Power(a,2)*B + S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 2*a*fr*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*Lr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*Sr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*f*L*(Lr/L + Sr)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*(-(F*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) - Fr*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - F*r*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra))) + 4*fr*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Power(a,2)*Br + Sr)*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Lrr + Lr*Sr + L*Srr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(Power(f,2)*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*(1 - Power(theta,2))*expl(A*Power(r,2) + T)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*Power(f,2)*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(a*g*(1 - Power(theta,2))*expl(S)*(8*a*A*f*L*r*expl(A*Power(r,2) + T)*(r*(Power(a,2)*Power(F,3)*g*Power(r,3)*(2*a*ga*L + g*(3*a*La + L*(4 + 2*a*Sa + a*Ta))) - 8*Power(a,2)*Power(F,2)*fr*g*L*Power(r,2)*expl(Power(a,2)*B + S) + 16*F*r*(-3*a*ga*L + g*(-4*a*La + L*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*L*(-(a*Fa*g*r) + 4*fr*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 4*f*expl(Power(a,2)*B + S)*(Lr*r*(-3*Power(a,2)*Power(F,2)*g*Power(r,2) + 64*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)*(2 + 2*r*Sr + r*Tr)) + 16*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - a*Power(f,2)*(-2*Power(a,4)*Power(F,3)*Fr*Power(g,2)*L*Power(r,4)*(3*Lr*r + L*(2 + 2*r*Sr + r*Tr)) + Power(a,4)*Power(F,4)*Power(g,2)*Power(r,3)*(-9*Power(Lr,2)*Power(r,2) + 6*L*r*(-Lr + Lrr*r) + Power(L,2)*(-4 - 4*r*Sr + 2*Power(r,2)*Power(Sr,2) + 4*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(r,2)*Trr)) + 32*Power(a,2)*F*Fr*g*L*Power(r,2)*(4*Lr*r + L*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*Power(F,2)*g*r*(-17*Power(Lr,2)*Power(r,2) + L*r*(14*Lrr*r + Lr*(-6 + 2*Power(a,2)*Br*r - 3*Ar*Power(r,3) + 4*r*Sr - 2*r*Tr)) + Power(L,2)*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) - 6*r*Sr + 6*Power(r,2)*Power(Sr,2) + 2*Power(a,2)*Br*r*(-1 + 2*r*Sr) + 10*Power(r,2)*Srr + 4*r*Tr - 2*Power(r,2)*Sr*Tr + Power(r,2)*Power(Tr,2) - Ar*Power(r,3)*(2 + 2*r*Sr + r*Tr) + 4*Power(r,2)*Trr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 256*(8*Power(Lr,2)*r + L*(-8*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 4*Ar*Power(r,3) - 3*r*Sr + 3*r*Tr)) + Power(L,2)*(-(Power(a,4)*Power(Br,2)*r) - 2*Power(a,2)*Brr*r - 3*r*Power(Sr,2) - 6*r*Srr - 2*Tr + 3*r*Sr*Tr + Power(a,2)*Br*r*(-2*Sr + Tr) + Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) - 2*r*Trr))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) - 2*a*f*(Power(a,4)*Power(F,4)*Power(g,2)*L*Power(r,4)*(3*fr*Lr*r + L*(2*frr*r + fr*(4 + 2*r*Sr + 3*r*Tr))) - 4*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(r*(-3*a*Fr*g*La*r + 32*fr*Lr*expl(Power(a,2)*B + S)) - L*(4*fr*(-(Power(a,2)*Br*r) + Ar*Power(r,3) - 5*(2 + r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(r*(2*a*Fr*ga + g*(2*a*Fra + Fr*(4 + 2*a*Sa + a*Ta))) - 16*frr*expl(Power(a,2)*B + S))))*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(F,3)*g*Power(r,3)*(-2*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(A*Power(r,2) + T) + g*(2*a*La*Lr*r*expl(A*Power(r,2) + T) - L*(-(r*(4*a*Lra + Lr*(4 + 3*a*Aa*Power(r,2) + 2*a*Sa + 4*a*Ta))) + a*La*(-8 + 3*Ar*Power(r,3) - 2*r*Sr + 2*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(-(Power(a,2)*fr*Fr*Power(r,2)) + 8*expl(A*Power(r,2) + T) - 4*Ar*Power(r,3)*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) - a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) - 4*r*Tr*expl(A*Power(r,2) + T) - 2*a*Sa*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + 2*r*Sr + r*Tr)*expl(A*Power(r,2) + T)))) + 8*F*r*expl(A*Power(r,2) + T)*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(-2*a*La*Lr*r*expl(A*Power(r,2) + T) + L*(-(r*(4*a*Lra + Lr*(6 - 2*Power(a,2)*B - Power(a,3)*Ba + 2*a*Aa*Power(r,2) + a*Sa + 3*a*Ta))) + a*La*(-10 + Power(a,2)*Br*r + 4*Ar*Power(r,3) - r*Sr + 3*r*Tr))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*fr*Fr*Power(r,2) - 12*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) - a*r*Sr*Ta*expl(A*Power(r,2) + T) + 6*r*Tr*expl(A*Power(r,2) + T) - Power(a,3)*Ba*r*Tr*expl(A*Power(r,2) + T) + a*r*Sa*Tr*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(-2 + Power(a,2)*Br*r - r*Sr - r*Tr)*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr)*expl(A*Power(r,2) + T))) + 12*a*ga*L*(-(Lr*r) + L*(-2 + Ar*Power(r,3) + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*L*(r*(a*g*(4*Fr*La + Fa*Lr)*r - 20*fr*Lr*expl(Power(a,2)*B + S)) + L*(4*fr*(-6 - Power(a,2)*Br*r + Ar*Power(r,3) - 3*r*Sr - 2*r*Tr)*expl(Power(a,2)*B + S) - r*(-3*a*Fr*ga*r + g*(r*(-2*a*Fra + Fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + a*Fa*(-2 + Ar*Power(r,3) + r*Tr)) + 8*frr*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)) + 4*r*(-4*a*g*Power(La,2)*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(L,2)*(-(a*Power(fr,2)*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + 2*Power(a,2)*F*fr*g*r*(Aa*Power(r,2) + Ta)*expl(A*Power(r,2) + T)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 4*expl(2*(A*Power(r,2) + T))*(-(Power(a,2)*F*Power(g,2)*Power(r,2)*(-2*a*Fa*(Aa*Power(r,2) + Ta) + F*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa)))) + 48*a*ga*(Aa*Power(r,2) + Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)*Ta) + 16*a*Aaa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Power(Aa,2)*Power(r,4)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*Power(a,2)*B*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*Power(a,3)*Ba*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*a*Sa*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Power(Ta,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*a*Taa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - Aa*Power(r,2)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))) + 2*L*expl(A*Power(r,2) + T)*(Power(a,2)*F*Power(g,2)*Power(r,2)*(-(Power(a,2)*Power(F,2)*fr*La*r) - 4*a*Fa*La*expl(A*Power(r,2) + T) + 2*F*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T)) + 4*g*expl(A*Power(r,2) + T)*(-16*a*Laa*expl(Power(a,2)*B + A*Power(r,2) + S + T) + La*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*(4 - Power(a,3)*Ba + 4*a*Aa*Power(r,2) + a*Sa + 5*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 96*a*ga*La*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T)))))/(4.*Power(f,2)*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-1 + Power(theta,2))*expl(A*Power(r,2) + T)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(Power(f,2)*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][1][4][2] = (a*(-1 + Power(theta,2))*expl(Power(a,2)*B + 2*S)*((-4*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/f + (4*a*g*(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T)*(a*f*(-2*Fr*L*r + F*(-(Lr*r) + L*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/f - 2*Lr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*Sr*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(Lr/L + Sr)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*L*(-(Power(a,2)*f*F*g*(Lr + L*Sr)) - Power(a,2)*F*fr*g*r*(Lr + L*Sr) - Power(a,2)*f*Fr*g*r*(Lr + L*Sr) - Power(a,2)*f*F*g*r*(Lrr + Lr*Sr + L*Srr) + 4*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra)))*expl(A*Power(r,2) + T) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*(2*A*r + Ar*Power(r,2) + Tr)*expl(A*Power(r,2) + T))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*L*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*F*g*r*(-1 + Power(theta,2))*expl(S)*(4*expl(Power(a,2)*B + S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T))*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 2*a*fr*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*Lr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*Sr*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*f*L*(Lr/L + Sr)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*f*L*(-(F*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) - Fr*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) - F*r*(a*ga*Lr + g*(Lr*(2 + a*Sa) + a*(Lra + L*Sra))) + 4*fr*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Power(a,2)*Br + Sr)*(Lr + L*Sr)*expl(Power(a,2)*B + S) + 4*f*(Lrr + Lr*Sr + L*Srr)*expl(Power(a,2)*B + S))*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*a*f*L*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(-2*Power(a,2)*Power(F,2)*g*r - 2*Power(a,2)*F*Fr*g*Power(r,2) + 16*(Power(a,2)*Br + 2*A*r + Ar*Power(r,2) + Sr + Tr)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 2*a*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S))*(a*F*g*r*(a*F*fr*L*r - a*f*(Fr*L*r + F*(L + Lr*r)) + 2*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)) + 8*(f*Lr + 2*A*f*L*r + L*(-2*fr + f*(Ar*Power(r,2) + Tr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,3)*F*(1 - Power(theta,2))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*(1 - Power(theta,2))*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*(-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][1][4][3] = 0 ;

C4[4][1][4][4] = 0 ;

C4[4][2][0][0] = 0 ;

C4[4][2][0][1] = 0 ;

C4[4][2][0][2] = 0 ;

C4[4][2][0][3] = 0 ;

C4[4][2][0][4] = 0 ;

C4[4][2][1][0] = 0 ;

C4[4][2][1][1] = 0 ;

C4[4][2][1][2] = 0 ;

C4[4][2][1][3] = 0 ;

C4[4][2][1][4] = Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(((2/a + ga/g + La/L + Sa)*(Lr/L + Sr))/4. + (-((La*Lr)/Power(L,2)) + Lra/L + Sra)/2. + ((2/a + ga/g + La/L + Sa)*(a*F*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T))/(f*L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - ((Lr/L + Sr)*expl(Power(a,2)*B + S)*(-(a*f*F*r*(Lr + L*(Power(a,2)*Br + Sr))) + 4*(La + L*(Aa*Power(r,2) + Ta))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) - (Power(a,3)*F*(1 - Power(theta,2))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*(1 - Power(theta,2))*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (a*F*(-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][2][2][0] = 0 ;

C4[4][2][2][1] = 0 ;

C4[4][2][2][2] = 0 ;

C4[4][2][2][3] = 0 ;

C4[4][2][2][4] = (Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(Power(2/a + ga/g + La/L + Sa,2) + 2*(-2/Power(a,2) - Power(ga,2)/Power(g,2) + gaa/g - Power(La,2)/Power(L,2) + Laa/L + Saa) + (4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)*(-2*a*Fa*g*L*r + F*r*(-(a*ga*L) + g*(-(a*La) + L*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa))) + 4*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)))/(g*Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - (2*(2/a + ga/g + La/L + Sa)*(a*F*g*r*(g*(a*Fa*L + F*(L + a*La))*r - 2*f*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 8*(2*a*B*g*L + g*La + L*(-ga + g*(Power(a,2)*Ba + Sa)))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(g*L*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/4. - (Power(a,2)*(1 - Power(theta,2))*expl(Power(a,2)*B + S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((a*(1 - Power(theta,2))*expl(S)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - ((-1 + Power(theta,2))*expl(Power(a,2)*B + S)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][2][3][0] = 0 ;

C4[4][2][3][1] = 0 ;

C4[4][2][3][2] = 0 ;

C4[4][2][3][3] = 0 ;

C4[4][2][3][4] = 0 ;

C4[4][2][4][0] = 0 ;

C4[4][2][4][1] = (Power(a,2)*F*g*r*(-1 + Power(theta,2))*expl(S)*(Power(a,3)*f*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr + L*Sr) + g*(-(a*La*Lr) + L*(Lr*(2 + a*Sa) + a*(2*Lra + La*Sr)) + Power(L,2)*((2 + a*Sa)*Sr + 2*a*Sra))) + 8*a*F*r*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-2*a*ga*L*(Lr + L*Sr) + g*(a*La*Lr + L*(-(a*(2*Lra + La*Sr)) + Lr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(-2*a*Sra + Sr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta))))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) - 4*a*Power(F,2)*Power(r,2)*(-(Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T)) + Power(g,2)*(-2*Power(a,2)*Power(La,2) + Power(a,2)*L*(2*Laa + La*(Aa*Power(r,2) + Sa + Ta)) + Power(L,2)*(Power(a,2)*Power(Sa,2) + a*Aa*Power(r,2)*(2 + a*Sa) + a*Sa*(2 + a*Ta) + 2*(-2 + Power(a,2)*Saa + a*Ta)))*expl(A*Power(r,2) + T) + a*g*(a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + a*L*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + ga*La*expl(A*Power(r,2) + T)) + Power(L,2)*(ga*(2 + a*Aa*Power(r,2) + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + a*(Power(f,2)*Sr*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))))) - 32*a*B*L*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*(-2*a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fa*g*r*Sr - 2*Power(a,3)*Br*Power(f,2)*Sr*expl(Power(a,2)*B + S) - 2*a*Power(f,2)*Power(Sr,2)*expl(Power(a,2)*B + S) + 4*Power(a,2)*Ba*g*expl(A*Power(r,2) + T) - 4*a*gaa*expl(A*Power(r,2) + T) - 4*g*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*g*Sa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba - 2*a*Sa)*expl(A*Power(r,2) + T) - 4*a*g*Saa*expl(A*Power(r,2) + T)) + L*(-2*a*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + 2*ga*La*expl(A*Power(r,2) + T)) + g*(2*(-2 + Power(a,3)*Ba)*La*expl(A*Power(r,2) + T) + a*(a*f*Fa*Lr*r - 4*Laa*expl(A*Power(r,2) + T)))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,2)*(-1 + Power(theta,2))*expl(A*Power(r,2) + S + T)*(-(a*Power(F,3)*g*Power(r,3)*(-(Power(a,2)*Power(ga,2)*Power(L,2)) + 2*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-3*Power(a,2)*Power(La,2) + 2*a*L*(-La + a*Laa) + Power(L,2)*(-4 + 2*a*Sa + Power(a,2)*Power(Sa,2) + 2*Power(a,2)*Saa)))) + 2*a*Power(F,2)*g*Power(r,2)*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-(a*ga*L*(Lr + L*(Power(a,2)*Br + Sr))) + g*(-3*a*La*Lr + L*(Lr*(-2 + Power(a,3)*Ba + a*Sa) - a*(-2*Lra + La*(Power(a,2)*Br + Sr))) + Power(L,2)*(-(Power(a,2)*Br*(2 + a*Sa)) + (-2 + Power(a,3)*Ba + a*Sa)*Sr + 2*a*Sra)))*expl(Power(a,2)*B + S)) + 8*a*B*F*g*L*r*expl(Power(a,2)*B + S)*(-4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*r*Sr - 8*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T)))) - 8*F*g*r*expl(Power(a,2)*B + S)*(6*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba + a*Aa*Power(r,2) - 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*f*Fa*r*Sr - 4*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + 4*Ta*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T))) + a*L*(-2*ga*La*expl(A*Power(r,2) + T) - g*(-(a*f*Fa*Lr*r) + 4*Laa*expl(A*Power(r,2) + T) - 2*La*(Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(A*Power(r,2) + T)))) + 64*f*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)))/(f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,3)*F*(1 - Power(theta,2))*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*f*L*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*(1 - Power(theta,2))*expl(S)*(-4*a*Power(f,2)*F*g*expl(Power(a,2)*B + S)*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + f*(-(Power(a,3)*Power(F,4)*Power(g,2)*Power(r,3)*(2*a*ga*L*r*(Lr + L*Sr) + g*(-7*a*La*Lr*r + L*(r*(10*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr)) + Power(L,2)*(a*Ta*(2 + r*Tr) + 2*r*((2 + a*Sa)*Sr + a*(2*Sra + Tra)))))) + 4*Power(a,3)*Power(F,3)*Power(g,2)*L*Power(r,3)*(-(a*Fra*g*L*r) + 4*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) - 32*a*F*g*L*r*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa)) + a*Fa*(-2 + 2*A*Power(r,2) + Ar*Power(r,3) + r*Tr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 4*a*Power(F,2)*g*r*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) + 4*a*ga*L*(-3*Lr*r + L*(-2 + 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr + r*Tr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(16*a*La*Lr*r + L*(a*La*(-4 + 4*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) + 2*r*Sr) + r*(-16*a*Lra + Lr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + 4*a*Aa*Power(r,2) - a*Sa + 3*a*Ta))) + Power(L,2)*(-4 + 2*Power(a,3)*Ba + 4*Power(a,2)*Br*r + 2*a*Aa*Power(r,2) + 2*Ar*Power(r,3) - Power(a,3)*Ar*Ba*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 2*a*Sa + 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Sa) - 4*r*Sr + 3*a*Aa*Power(r,3)*Sr - 2*a*r*Sa*Sr - 8*a*r*Sra - 2*a*Ta + 2*Power(a,3)*Br*r*Ta + 4*a*r*Sr*Ta + 2*r*Tr - Power(a,3)*Ba*r*Tr + a*Aa*Power(r,3)*Tr - a*r*Sa*Tr - a*r*Ta*Tr - 2*Power(a,2)*B*(-2 + Ar*Power(r,3) + r*Tr) - 4*a*r*Tra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 256*(2*Power(a,2)*Br*ga*Power(L,2) + g*(3*La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-6*Lra + 3*Lr*(Aa*Power(r,2) + Ta) + L*(-4*Sra + 3*Sr*Ta + a*Br*(4 + 2*a*Sa + a*Ta) + Aa*r*(2 + 2*r*Sr + r*Tr) - 2*Tra))))*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T))) + 2*g*r*(-(Power(a,4)*Power(F,4)*fr*Power(g,2)*L*Power(r,3)*(La + L*Ta)) + 2*Power(a,2)*Power(F,3)*g*Power(r,2)*(2*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(a*Power(La,2) + L*(2*a*Laa + La*(2 + 5*a*Aa*Power(r,2) + 2*a*Sa + 6*a*Ta)) + Power(L,2)*(2*a*Power(Aa,2)*Power(r,4) + 2*(1 + a*Sa)*Ta + 3*a*Power(Ta,2) + Aa*Power(r,2)*(2 + 2*a*Sa + 5*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(F,2)*g*L*r*(a*Fa*g*r*(La + L*(Aa*Power(r,2) + Ta)) - 4*fr*(La + L*(-(Aa*Power(r,2)) + Ta))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 256*Aa*fr*Power(L,2)*r*expl(2*(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*F*(-3*a*ga*L*(La + L*(Aa*Power(r,2) + Ta)) + g*(-(a*Power(La,2)) + L*(-2*a*Laa + La*(-4 + 2*Power(a,2)*B + Power(a,3)*Ba - 4*a*Aa*Power(r,2) - a*Sa - 5*a*Ta)) - Power(L,2)*(a*Power(Aa,2)*Power(r,4) + (4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa)*Ta + 2*a*Power(Ta,2) + Aa*Power(r,2)*(4 - 2*Power(a,2)*B - Power(a,3)*Ba + a*Sa + 3*a*Ta) + 2*a*(Aaa*Power(r,2) + Taa))))*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (a*F*(-1 + Power(theta,2))*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*f*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][2][4][2] = (a*(-1 + Power(theta,2))*expl(Power(a,2)*B + 2*S)*(Power(a,3)*f*Power(F,3)*g*Power(r,3)*(a*ga*L*(Lr + L*Sr) + g*(-(a*La*Lr) + L*(Lr*(2 + a*Sa) + a*(2*Lra + La*Sr)) + Power(L,2)*((2 + a*Sa)*Sr + 2*a*Sra))) + 8*a*F*r*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-2*a*ga*L*(Lr + L*Sr) + g*(a*La*Lr + L*(-(a*(2*Lra + La*Sr)) + Lr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta)) + Power(L,2)*(-2*a*Sra + Sr*(-4 + Power(a,3)*Ba + a*Aa*Power(r,2) + a*Ta))))*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) - 4*a*Power(F,2)*Power(r,2)*(-(Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T)) + Power(g,2)*(-2*Power(a,2)*Power(La,2) + Power(a,2)*L*(2*Laa + La*(Aa*Power(r,2) + Sa + Ta)) + Power(L,2)*(Power(a,2)*Power(Sa,2) + a*Aa*Power(r,2)*(2 + a*Sa) + a*Sa*(2 + a*Ta) + 2*(-2 + Power(a,2)*Saa + a*Ta)))*expl(A*Power(r,2) + T) + a*g*(a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + a*L*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + ga*La*expl(A*Power(r,2) + T)) + Power(L,2)*(ga*(2 + a*Aa*Power(r,2) + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + a*(Power(f,2)*Sr*(Power(a,2)*Br + Sr)*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))))) - 32*a*B*L*(4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(-(a*f*F*Lr*r) + 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,2)*f*F*r*Sr) + 8*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*(-2*a*Power(f,2)*Power(Lr,2)*expl(Power(a,2)*B + S) + 4*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,2)*f*Fa*g*r*Sr - 2*Power(a,3)*Br*Power(f,2)*Sr*expl(Power(a,2)*B + S) - 2*a*Power(f,2)*Power(Sr,2)*expl(Power(a,2)*B + S) + 4*Power(a,2)*Ba*g*expl(A*Power(r,2) + T) - 4*a*gaa*expl(A*Power(r,2) + T) - 4*g*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*g*Sa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba - 2*a*Sa)*expl(A*Power(r,2) + T) - 4*a*g*Saa*expl(A*Power(r,2) + T)) + L*(-2*a*(Power(f,2)*Lr*(Power(a,2)*Br + 2*Sr)*expl(Power(a,2)*B + S) + 2*ga*La*expl(A*Power(r,2) + T)) + g*(2*(-2 + Power(a,3)*Ba)*La*expl(A*Power(r,2) + T) + a*(a*f*Fa*Lr*r - 4*Laa*expl(A*Power(r,2) + T)))))*expl(Power(a,2)*B + A*Power(r,2) + S + T)))/(L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,3)*F*r*(-1 + Power(theta,2))*expl(S)*(-(a*Power(F,3)*g*Power(r,3)*(-(Power(a,2)*Power(ga,2)*Power(L,2)) + 2*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-3*Power(a,2)*Power(La,2) + 2*a*L*(-La + a*Laa) + Power(L,2)*(-4 + 2*a*Sa + Power(a,2)*Power(Sa,2) + 2*Power(a,2)*Saa)))) + 2*a*Power(F,2)*g*Power(r,2)*(a*Fa*g*L*r*(a*ga*L + g*(a*La + L*(2 + a*Sa))) + 2*f*(-(a*ga*L*(Lr + L*(Power(a,2)*Br + Sr))) + g*(-3*a*La*Lr + L*(Lr*(-2 + Power(a,3)*Ba + a*Sa) - a*(-2*Lra + La*(Power(a,2)*Br + Sr))) + Power(L,2)*(-(Power(a,2)*Br*(2 + a*Sa)) + (-2 + Power(a,3)*Ba + a*Sa)*Sr + 2*a*Sra)))*expl(Power(a,2)*B + S)) + 8*a*B*F*g*L*r*expl(Power(a,2)*B + S)*(-4*a*ga*L*expl(A*Power(r,2) + T) + g*(a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*r*Sr - 8*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T)))) - 8*F*g*r*expl(Power(a,2)*B + S)*(6*a*g*Power(La,2)*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) + 2*ga*(-6 + Power(a,3)*Ba + a*Aa*Power(r,2) - 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*f*Fa*r*Sr - 4*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + 4*Ta*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T))) + a*L*(-2*ga*La*expl(A*Power(r,2) + T) - g*(-(a*f*Fa*Lr*r) + 4*Laa*expl(A*Power(r,2) + T) - 2*La*(Power(a,2)*Ba + Aa*Power(r,2) + Sa + Ta)*expl(A*Power(r,2) + T)))) + 64*f*(Power(a,2)*Br*ga*Power(L,2) + g*(La*(3*Lr + L*(Power(a,2)*Br + Sr)) + L*(-2*Lra + Lr*(Aa*Power(r,2) + Ta) + L*(a*Br*(2 + a*Sa) + Aa*Power(r,2)*Sr - 2*Sra + Sr*Ta))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)))/(4.*L*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*(1 - Power(theta,2))*expl(Power(a,2)*B + S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(3.*g*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(a*(1 - Power(theta,2))*expl(S)*(-4*a*f*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,3)*g*Power(r,2)*(a*ga*L*(5*Lr*r + L*(2 + 2*Power(a,2)*Br*r + 4*r*Sr + r*Tr)) + g*(2*a*La*Lr*r + Power(L,2)*(4 + 4*Power(a,2)*Br*r + 8*r*Sr + Power(a,3)*Br*r*Ta + a*r*Sr*Ta + 2*r*Tr + a*Sa*(-2 + 2*Power(a,2)*Br*r - r*Tr) - Power(a,3)*Ba*(2 + 2*r*Sr + r*Tr)) + L*(r*(4*a*Lra + Lr*(10 - 3*Power(a,3)*Ba - a*Sa + a*Ta)) + a*La*(2 + 3*Power(a,2)*Br*r + 5*r*Sr + r*Tr)))) - 2*Power(a,2)*Power(F,2)*g*L*Power(r,2)*(-(a*g*(3*Fa*Lr*r + L*(2*Fra*r + Fa*(2 + 2*r*Sr + r*Tr)))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S)) + 32*L*(-(a*Fr*ga*L*r) + g*(-(a*(Fr*La + 4*Fa*Lr)*r) + L*(r*(-2*a*Fra + Fr*(-2 + Power(a,3)*Ba + a*Sa)) + a*Fa*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))) + 8*fr*(Lr + L*(Power(a,2)*Br + Sr))*expl(Power(a,2)*B + S))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*F*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(L,2)*Power(r,3)) - 4*a*ga*L*(6*Lr*r + L*(4 + 2*Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3) + 4*r*Sr))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 4*g*(-2*a*La*Lr*r + L*(r*(-4*a*Lra + Lr*(-12 + 4*Power(a,3)*Ba + a*Aa*Power(r,2) + 2*a*Sa)) + a*La*(-4 - 2*Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr)) + Power(L,2)*(-8 - 4*Power(a,2)*Br*r + 2*Ar*Power(r,3) + Power(a,3)*Aa*Br*Power(r,3) + 4*a*Sa - 2*Power(a,3)*Br*r*Sa - a*Ar*Power(r,3)*Sa - 2*A*Power(r,2)*(-2 + Power(a,3)*Ba + a*Sa) - 8*r*Sr + a*Aa*Power(r,3)*Sr + Power(a,3)*Ba*(4 - Ar*Power(r,3) + 2*r*Sr)))*expl(Power(a,2)*B + A*Power(r,2) + S + T))) - 16*a*Power(f,2)*expl(2*(Power(a,2)*B + S))*(Power(Lr,2)*r*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - L*(2*Lrr*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Lr*(5*Power(a,4)*Br*Power(F,2)*g*Power(r,3) - 2*Power(a,2)*F*Fr*g*Power(r,3) + 7*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*Power(a,2)*Br*r*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 96*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + Power(L,2)*(-2*r*(Power(a,2)*Brr + Srr)*(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 2*Power(a,4)*Power(Br,2)*r*(Power(a,2)*Power(F,2)*g*Power(r,2) - 8*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + Power(Sr,2)*(-4*Power(a,2)*Power(F,2)*g*Power(r,3) + 48*r*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Sr*(-2*Power(a,2)*F*Fr*g*Power(r,3) + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - Power(a,2)*Br*(-2*Power(a,2)*F*Fr*g*Power(r,3) + 6*Power(a,2)*Power(F,2)*g*Power(r,3)*Sr + Power(a,2)*Power(F,2)*g*Power(r,3)*Tr - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*A*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Ar*Power(r,3)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*r*Sr*expl(Power(a,2)*B + A*Power(r,2) + S + T)))) + r*(-(Power(a,3)*Power(F,4)*g*Power(r,4)*(-2*Power(a,2)*Power(ga,2)*Power(L,2) + 4*a*g*Power(L,2)*(a*gaa + ga*(1 + a*Sa)) + Power(g,2)*(-9*Power(a,2)*Power(La,2) + 6*a*L*(-La + a*Laa) + Power(L,2)*(-8 + 4*a*Sa + 2*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa - 2*a*Ta + Power(a,2)*Power(Ta,2) + 2*Power(a,2)*Taa)))) + 2*Power(a,3)*Power(F,3)*g*L*Power(r,3)*(a*Fa*Power(g,2)*r*(3*a*La + L*(4 + 2*a*Sa + a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S)))) - 16*a*Power(F,2)*Power(r,2)*expl(Power(a,2)*B + S)*(2*Power(a,2)*Power(ga,2)*Power(L,2)*expl(A*Power(r,2) + T) + a*g*L*(-5*a*ga*La + L*(-8*a*gaa + ga*(-16 + 2*Power(a,3)*Ba - 8*a*Sa - a*Ta)))*expl(A*Power(r,2) + T) + Power(g,2)*(17*Power(a,2)*Power(La,2)*expl(A*Power(r,2) + T) + a*L*(-14*a*Laa + La*(4 + 3*Power(a,3)*Ba - 2*a*Aa*Power(r,2) + a*Sa - 3*a*Ta))*expl(A*Power(r,2) + T) + Power(L,2)*(Power(a,3)*Fa*fr*r + 8*expl(A*Power(r,2) + T) - 2*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T) + Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + Power(a,3)*Ba*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 2*a*Aa*Power(r,2)*(-1 + 2*a*Ta)*expl(A*Power(r,2) + T) - 6*Power(a,2)*Taa*expl(A*Power(r,2) + T)))) - 32*a*F*L*r*(a*Fa*Power(g,2)*r*(4*a*La + L*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)) - 4*a*fr*ga*L*expl(Power(a,2)*B + S) + 2*g*(-2*a*fr*La*expl(Power(a,2)*B + S) + L*(Power(a,2)*Fa*ga*r + 2*fr*(-2 + Power(a,3)*Ba + a*Sa)*expl(Power(a,2)*B + S))))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 256*(8*a*g*Power(La,2)*expl(A*Power(r,2) + T) + L*(-6*a*ga*La + g*(-8*a*Laa + La*(-4 + 4*Power(a,3)*Ba - a*Aa*Power(r,2) + 2*a*Sa - 2*a*Ta)))*expl(A*Power(r,2) + T) + Power(L,2)*(-4*a*gaa*expl(A*Power(r,2) + T) - ga*(12 - 2*Power(a,3)*Ba + a*Aa*Power(r,2) + 4*a*Sa + 2*a*Ta)*expl(A*Power(r,2) + T) + g*(Power(a,2)*Fa*fr*r - 2*a*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - a*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 4*Sa*expl(A*Power(r,2) + T) - 4*a*Saa*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(Power(a,2)*Ba + Sa - 2*Ta)*expl(A*Power(r,2) + T) + 2*a*Sa*Ta*expl(A*Power(r,2) + T) - 2*a*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*Power(a,2)*Ba*(2 + a*Sa + a*Ta)*expl(A*Power(r,2) + T) - 4*a*Taa*expl(A*Power(r,2) + T))))*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 8*a*B*L*r*expl(Power(a,2)*B + S)*(Power(a,2)*Power(F,2)*Power(g,2)*Power(r,2)*(3*a*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(Power(a,2)*f*F*(2 + 2*r*Sr + r*Tr) - 2*(-(Power(a,2)*F*fr*r) + 2*(4 + 2*a*Sa + a*Ta)*expl(A*Power(r,2) + T)))) + 8*g*expl(A*Power(r,2) + T)*(-8*a*expl(Power(a,2)*B + S)*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)) + L*(-(Power(a,3)*Power(F,2)*ga*Power(r,2)) - 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) + 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + 2*A*Power(r,2) + Ar*Power(r,3) - 2*r*Sr))*expl(Power(a,2)*B + S) + 8*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 128*a*ga*L*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))/(4.*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((-1 + Power(theta,2))*expl(Power(a,2)*B + S)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(g*L*r*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][2][4][3] = 0 ;

C4[4][2][4][4] = 0 ;

C4[4][3][0][0] = 0 ;

C4[4][3][0][1] = 0 ;

C4[4][3][0][2] = 0 ;

C4[4][3][0][3] = 0 ;

C4[4][3][0][4] = 0 ;

C4[4][3][1][0] = 0 ;

C4[4][3][1][1] = 0 ;

C4[4][3][1][2] = 0 ;

C4[4][3][1][3] = 0 ;

C4[4][3][1][4] = 0 ;

C4[4][3][2][0] = 0 ;

C4[4][3][2][1] = 0 ;

C4[4][3][2][2] = 0 ;

C4[4][3][2][3] = 0 ;

C4[4][3][2][4] = 0 ;

C4[4][3][3][0] = 0 ;

C4[4][3][3][1] = 0 ;

C4[4][3][3][2] = 0 ;

C4[4][3][3][3] = 0 ;

C4[4][3][3][4] = -(Power(a,2)*g*L*(1 - Power(theta,2))*expl(S)*(-4 + (Power(a,2)*f*g*(Lr + L*Sr)*expl(S)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)))/(Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (a*g*(2/a + ga/g + La/L + Sa)*expl(S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(4.*(-1 + Power(theta,2))) - (Power(a,4)*g*expl(S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (-(Power(a,2)*g*(-1 + Power(theta,2))*expl(S)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + (Power(a,2)*g*(1 - Power(theta,2))*expl(S)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][3][4][0] = 0 ;

C4[4][3][4][1] = 0 ;

C4[4][3][4][2] = 0 ;

C4[4][3][4][3] = (Power(a,2)*g*L*expl(S)*(4 - 4*Power(theta,2) + (Power(a,2)*f*g*(Lr + L*Sr)*(-1 + Power(theta,2))*expl(S)*(-(F*r*(a*ga*L + g*(a*La + L*(2 + a*Sa)))) + 4*f*(Lr + L*Sr)*expl(Power(a,2)*B + S)))/(Power(L,2)*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + (a*g*(2/a + ga/g + La/L + Sa)*(-1 + Power(theta,2))*expl(S)*(-(Power(a,2)*f*F*g*r*(Lr + L*Sr)) + 4*(a*ga*L + g*(a*La + L*(2 + a*Sa)))*expl(A*Power(r,2) + T)))/(L*(-(Power(a,2)*Power(F,2)*g*Power(r,2)) + 16*expl(Power(a,2)*B + A*Power(r,2) + S + T)))))/(4.*(1 - Power(theta,2))) + (Power(a,4)*g*expl(S)*(Power(L,2)*(2*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa + a*Ta)) + f*(a*ga*(2 + 3*r*Sr + r*Tr) + g*(a*Ta*(2 + r*Sr + r*Tr) + a*Sa*(2 + 3*r*Sr + r*Tr) + 2*(2 + 3*r*Sr + 2*a*r*Sra + r*Tr + a*r*Tra))))*expl(S) + 2*Power(a,2)*Power(F,2)*g*r*expl(S)*(Power(a,2)*Power(f,2)*g*(-4 + 2*Power(a,4)*Power(Br,2)*Power(r,2) + 2*Power(a,2)*Brr*Power(r,2) + 9*Power(r,2)*Power(Sr,2) + 6*Power(r,2)*Srr + 2*r*Tr + Power(r,2)*Power(Tr,2) + 2*Power(a,2)*Br*r*(1 + 4*r*Sr + r*Tr) + 2*r*Sr*(1 + 2*r*Tr) + 2*Power(r,2)*Trr)*expl(Power(a,2)*B + S) + Power(a,2)*f*g*r*(2*fr*(4 + 3*Power(a,2)*Br*r + 7*r*Sr + 3*r*Tr)*expl(Power(a,2)*B + S) + r*(-(a*Fra*g*r) + 4*frr*expl(Power(a,2)*B + S))) + Power(r,2)*(Power(g,2)*(-4 + 2*Power(a,2)*Aaa*Power(r,2) + 2*Power(a,2)*Power(Aa,2)*Power(r,4) + 3*Power(a,2)*Power(Sa,2) + 4*Power(a,2)*Saa + 8*a*Ta + 5*Power(a,2)*Power(Ta,2) + 2*a*Sa*(4 + 3*a*Ta) + 2*a*Aa*Power(r,2)*(3 + 2*a*Sa + 3*a*Ta) + 4*Power(a,2)*Taa)*expl(A*Power(r,2) + T) - (Power(a,2)*Power(ga,2) + 32*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + 2*a*g*(2*a*Power(fr,2)*expl(Power(a,2)*B + S) + (2*a*gaa + ga*(4 + 2*a*Aa*Power(r,2) + 3*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)))) - 2*Power(a,2)*F*g*r*expl(S)*(2*Power(a,2)*Power(f,2)*Fr*g*r*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + 2*r*(a*Fa*Power(g,2)*r*(4 + a*Aa*Power(r,2) + 2*a*Sa + 2*a*Ta) - 12*a*fr*ga*expl(Power(a,2)*B + S) + 2*g*(Power(a,2)*Fa*ga*r + 2*fr*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba + a*Aa*Power(r,2) - a*Sa - a*Ta)*expl(Power(a,2)*B + S)))*expl(A*Power(r,2) + T) + f*(-(Power(a,3)*Fa*Fr*Power(g,2)*Power(r,3)) + 4*g*expl(Power(a,2)*B + S)*(Power(a,2)*fr*Fr*Power(r,2) - 24*expl(A*Power(r,2) + T) + 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 4*Power(a,2)*Br*r*expl(A*Power(r,2) + T) + 6*Ar*Power(r,3)*expl(A*Power(r,2) + T) - Power(a,3)*Ar*Ba*Power(r,3)*expl(A*Power(r,2) + T) - 4*a*Sa*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Sa*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Sa*expl(A*Power(r,2) + T) - 12*r*Sr*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*r*Sr*expl(A*Power(r,2) + T) - 2*a*r*Sa*Sr*expl(A*Power(r,2) + T) - 2*Power(a,2)*B*(-4 + Ar*Power(r,3) - 2*r*Sr)*expl(A*Power(r,2) + T) - 8*a*r*Sra*expl(A*Power(r,2) + T) - 4*a*Ta*expl(A*Power(r,2) + T) + 2*Power(a,3)*Br*r*Ta*expl(A*Power(r,2) + T) + a*Ar*Power(r,3)*Ta*expl(A*Power(r,2) + T) + 2*a*r*Sr*Ta*expl(A*Power(r,2) + T) + a*Aa*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(A*Power(r,2) + T) - 4*a*r*Tra*expl(A*Power(r,2) + T)) + 4*a*ga*(-12 + 2*Power(a,2)*Br*r + 3*Ar*Power(r,3) - 6*r*Sr)*expl(Power(a,2)*B + A*Power(r,2) + S + T))) + 16*Power(a,2)*A*f*g*r*(4*f*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr)*expl(Power(a,2)*B + S) + r*(-2*a*Fa*g*r + F*r*(-3*a*ga + g*(-6 + 2*Power(a,2)*B + Power(a,3)*Ba - a*Sa - a*Ta)) + 8*fr*expl(Power(a,2)*B + S)))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T) + 16*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) + Power(g,2)*r*(4*Power(a,3)*f*Fa + 2*Power(a,3)*Fa*fr*r + 6*Power(a,2)*f*Fr*r - Power(a,5)*Ba*f*Fr*r + 2*Power(a,3)*f*Fra*r - Power(a,3)*Ar*f*Fa*Power(r,3) + Power(a,3)*f*Fr*r*Sa + 2*Power(a,3)*f*Fa*r*Sr + Power(a,3)*f*Fr*r*Ta - 8*expl(A*Power(r,2) + T) + 8*Power(a,3)*Ba*expl(A*Power(r,2) + T) - 4*Power(a,2)*Aaa*Power(r,2)*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Aa,2)*Power(r,4)*expl(A*Power(r,2) + T) - 16*a*Sa*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) - 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Saa*expl(A*Power(r,2) + T) - 16*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,4)*Ba*Ta*expl(A*Power(r,2) + T) - 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T) - 6*Power(a,2)*Power(Ta,2)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(-4 + Power(a,3)*Ba - a*Sa - 3*a*Ta)*expl(A*Power(r,2) + T) - 8*Power(a,2)*Taa*expl(A*Power(r,2) + T) + 2*Power(a,2)*B*(-(Power(a,2)*f*Fr*r) + 8*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 4*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))) - a*g*(2*a*Power(f,2)*(Power(a,4)*Power(Br,2)*r + 2*Power(a,2)*Br*(1 + 2*r*Sr) - Ar*Power(r,2)*(2 + Power(a,2)*Br*r + 3*r*Sr + r*Tr) + 2*(3*Sr + 3*r*Power(Sr,2) + Tr + r*(Power(a,2)*Brr + 3*Srr + Trr)))*expl(Power(a,2)*B + S) + a*f*(-4*fr*(Ar*Power(r,3) - 2*(3 + Power(a,2)*Br*r + 3*r*Sr + r*Tr))*expl(Power(a,2)*B + S) + r*(-3*a*Fr*ga*r + 8*frr*expl(Power(a,2)*B + S))) + 2*r*(4*a*Power(fr,2)*expl(Power(a,2)*B + S) + (4*a*gaa + ga*(16 - 4*Power(a,2)*B - 2*Power(a,3)*Ba + 3*a*Aa*Power(r,2) + 6*a*Sa + 6*a*Ta))*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(4 + 2*a*Sa + a*Ta)) + a*La*(2 + 2*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(2 + 2*a*Aa*Power(r,2) + 2*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 16*a*(-4*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 3*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 2*g*r*(-4*La*expl(A*Power(r,2) + T)*(Power(a,3)*Power(F,2)*ga*Power(r,2) + 4*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 2*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - r*Sr))*expl(Power(a,2)*B + S) - 32*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 8*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 8*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-(Power(a,3)*Power(F,3)*ga*Lr*Power(r,2)) + 2*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 4*Sr + Tr)))*expl(Power(a,2)*B + S) - 4*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 12*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 2*a*Sa*expl(A*Power(r,2) + T))) + 16*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 64*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(12.*L*r*Power(Power(a,3)*Power(F,2)*g*Power(r,2) - 16*a*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) + ((Power(a,2)*g*(-1 + Power(theta,2))*expl(S)*(Power(L,2)*(4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) - Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) + 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) - 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) + 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) - 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) - a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*L*r*(1 - Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)) - (Power(a,2)*g*(1 - Power(theta,2))*expl(S)*(Power(L,2)*(-4*Power(a,4)*Power(F,4)*Power(g,2)*Power(r,5) + Power(a,4)*Power(F,3)*Power(g,2)*Power(r,3)*(2*fr*r*(a*ga + g*(2 + a*Sa)) + f*(a*ga*(2 + 4*r*Sr + r*Tr) + g*(4 + 4*a*r*Sra + r*Sr*(8 + a*Ta) + 2*r*Tr + a*Sa*(2 + 4*r*Sr + r*Tr))))*expl(S) - 4*Power(a,2)*Power(F,2)*g*Power(r,3)*expl(S)*(a*Power(g,2)*(2*a*Power(Sa,2) + 2*Aa*Power(r,2)*(2 + a*Sa) + 2*a*Saa + 6*Ta + 3*Sa*(2 + a*Ta))*expl(A*Power(r,2) + T) + a*g*(ga*(6 + 2*a*Aa*Power(r,2) + 4*a*Sa + 3*a*Ta)*expl(A*Power(r,2) + T) + a*(f*(4*fr*Sr + f*(2*Power(a,2)*Br*Sr + 4*Power(Sr,2) + 2*Srr + Sr*Tr))*expl(Power(a,2)*B + S) + 2*gaa*expl(A*Power(r,2) + T))) - 32*expl(Power(a,2)*B + A*Power(r,2) + T)) + 8*Power(a,2)*F*g*r*expl(S)*(Power(a,2)*Power(f,2)*Fr*g*Power(r,2)*Sr*expl(Power(a,2)*B + S) + r*(a*ga + g*(2 + a*Sa))*(a*Fa*g*r - 4*fr*expl(Power(a,2)*B + S))*expl(A*Power(r,2) + T) + 2*f*(a*ga*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr) + g*(-8 + 2*Power(a,2)*Br*r + 2*Ar*Power(r,3) + 2*A*Power(r,2)*(2 + a*Sa) - 8*r*Sr + 2*Power(a,2)*B*r*Sr + Power(a,3)*Ba*r*Sr + a*Aa*Power(r,3)*Sr + a*Sa*(-4 + Power(a,2)*Br*r + Ar*Power(r,3) - 2*r*Sr) - 4*a*r*Sra))*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 32*(2*r*(-(Power(a,2)*Power(ga,2)) + 16*expl(Power(a,2)*B))*expl(A*Power(r,2) + T) - Power(g,2)*r*(-2*Power(a,2)*f*Fr*r - Power(a,3)*f*Fr*r*Sa - Power(a,3)*f*Fa*r*Sr + 8*expl(A*Power(r,2) + T) - 4*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 12*a*Sa*expl(A*Power(r,2) + T) - 2*Power(a,4)*Ba*Sa*expl(A*Power(r,2) + T) + 2*Power(a,2)*Power(Sa,2)*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*(2 + a*Sa)*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*(2 + a*Sa)*expl(A*Power(r,2) + T) + 4*Power(a,2)*Saa*expl(A*Power(r,2) + T) + 8*a*Ta*expl(A*Power(r,2) + T) + 4*Power(a,2)*Sa*Ta*expl(A*Power(r,2) + T)) + a*g*(-2*a*(f*(4*fr*r*Sr + f*((2 + Power(a,2)*Br*r - 2*A*Power(r,2) - Ar*Power(r,3))*Sr + 3*r*Power(Sr,2) + 2*r*Srr))*expl(Power(a,2)*B + S) + 2*gaa*r*expl(A*Power(r,2) + T)) - ga*r*(-(Power(a,2)*f*Fr*r) + 20*expl(A*Power(r,2) + T) - 4*Power(a,2)*B*expl(A*Power(r,2) + T) - 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) + 8*a*Sa*expl(A*Power(r,2) + T) + 4*a*Ta*expl(A*Power(r,2) + T))))*expl(Power(a,2)*B + A*Power(r,2) + 2*S + T)) + 2*Power(a,2)*g*r*expl(S)*(Power(a,2)*Power(F,2)*Power(g,2)*La*Power(r,2)*(a*f*F*Lr*r - 2*La*expl(A*Power(r,2) + T)) + 2*g*expl(Power(a,2)*B + S)*(-(Power(a,2)*Power(f,2)*Power(F,2)*Power(Lr,2)*Power(r,2)) - 8*a*f*F*La*Lr*r*expl(A*Power(r,2) + T) + 16*Power(La,2)*expl(2*(A*Power(r,2) + T))) + 32*Power(f,2)*Power(Lr,2)*expl(2*Power(a,2)*B + A*Power(r,2) + 2*S + T)) + a*g*L*expl(S)*(Power(a,2)*F*Power(g,2)*Power(r,3)*(a*Power(F,2)*(2*a*fr*La*r + f*(r*(4*a*Lra + Lr*(10 + 5*a*Sa + a*Ta)) + a*La*(2 + 5*r*Sr + r*Tr))) + 8*a*Fa*La*expl(A*Power(r,2) + T) - 4*F*(2*a*Laa + La*(8 + 2*a*Aa*Power(r,2) + 5*a*Sa + 3*a*Ta))*expl(A*Power(r,2) + T)) + 32*a*(-2*f*(-4*fr*Lr*r + f*(-2*Lrr*r + Lr*(-2 - Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 6*r*Sr)))*expl(Power(a,2)*B + S) - 3*ga*r*(a*f*F*Lr*r - 4*La*expl(A*Power(r,2) + T)))*expl(Power(a,2)*B + A*Power(r,2) + S + T) + g*r*(-4*La*expl(A*Power(r,2) + T)*(5*Power(a,3)*Power(F,2)*ga*Power(r,2) + 8*Power(a,2)*F*fr*r*expl(Power(a,2)*B + S) - 4*Power(a,2)*f*(-2*Fr*r + F*(-4 + Power(a,2)*Br*r + 2*A*Power(r,2) + Ar*Power(r,3) - 4*r*Sr))*expl(Power(a,2)*B + S) - 160*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 32*Power(a,2)*B*expl(Power(a,2)*B + A*Power(r,2) + S + T) + 16*Power(a,3)*Ba*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 16*a*Aa*Power(r,2)*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 64*a*Sa*expl(Power(a,2)*B + A*Power(r,2) + S + T) - 32*a*Ta*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - a*(f*r*(-5*Power(a,3)*Power(F,3)*ga*Lr*Power(r,2) + 4*Power(a,2)*Power(F,2)*r*(4*fr*Lr + f*(2*Lrr + Lr*(2*Power(a,2)*Br + 7*Sr + Tr)))*expl(Power(a,2)*B + S) - 8*F*expl(Power(a,2)*B + S)*(-8*a*Lra*expl(A*Power(r,2) + T) + Lr*(Power(a,2)*f*Fr*r - 24*expl(A*Power(r,2) + T) + 4*Power(a,2)*B*expl(A*Power(r,2) + T) + 2*Power(a,3)*Ba*expl(A*Power(r,2) + T) + 2*a*Aa*Power(r,2)*expl(A*Power(r,2) + T) - 8*a*Sa*expl(A*Power(r,2) + T))) + 32*a*Fa*Lr*expl(Power(a,2)*B + A*Power(r,2) + S + T)) - 128*Laa*expl(Power(a,2)*B + 2*A*Power(r,2) + S + 2*T))))))/(4.*L*r*(-1 + Power(theta,2))*Power(Power(a,2)*Power(F,2)*g*Power(r,2) - 16*expl(Power(a,2)*B + A*Power(r,2) + S + T),2)))/3. ;

C4[4][3][4][4] = 0 ;

C4[4][4][0][0] = 0 ;

C4[4][4][0][1] = 0 ;

C4[4][4][0][2] = 0 ;

C4[4][4][0][3] = 0 ;

C4[4][4][0][4] = 0 ;

C4[4][4][1][0] = 0 ;

C4[4][4][1][1] = 0 ;

C4[4][4][1][2] = 0 ;

C4[4][4][1][3] = 0 ;

C4[4][4][1][4] = 0 ;

C4[4][4][2][0] = 0 ;

C4[4][4][2][1] = 0 ;

C4[4][4][2][2] = 0 ;

C4[4][4][2][3] = 0 ;

C4[4][4][2][4] = 0 ;

C4[4][4][3][0] = 0 ;

C4[4][4][3][1] = 0 ;

C4[4][4][3][2] = 0 ;

C4[4][4][3][3] = 0 ;

C4[4][4][3][4] = 0 ;

C4[4][4][4][0] = 0 ;

C4[4][4][4][1] = 0 ;

C4[4][4][4][2] = 0 ;

C4[4][4][4][3] = 0 ;

C4[4][4][4][4] = 0 ;