Inv_test/psi4_analytical/psi4-m0-a1e-08-L2-N3.txt
2024-02-17 23:48:28 -05:00

14339 lines
974 KiB
Plaintext

(((-I)*Csc[theta]*(((-1/2*I)*r*Sin[theta]*(1 - 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))*
((-1.0000000000000001*^-16*
((3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4 + 3*((3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
(1 - 3*Sin[theta]^2))^2)/(-2 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)^2 -
(1.*^-8*(-5.*^-9*(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta]) +
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/2)^2 +
(-2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta]) + 1.5000000000000002*^-8*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
((3*((21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(21*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^4 +
(9*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (2*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2)))/r^2 + ((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) -
168*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
36*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
144*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) +
24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2) + 4*r^3*
(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r)*
Sin[theta]^2)/4 + 3*((3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (3*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3)*(1 -
3*Sin[theta]^2))))/(-2 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)^2))/
Sqrt[2] + ((I/2)*r*Sin[theta]*(1 - 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))*
((5.*^-9*(7.500000000000001*^-9*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*((3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r))/4 + 3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(-3 +
Csc[theta]^2)) + 3.0000000000000004*^-8*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-3 + Csc[theta]^2)*
((3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r))/4 + 3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(-3 +
Csc[theta]^2)) - (7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-3 +
Csc[theta]^2))*((3*((-105*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (105*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (48*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + (13*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^3 - (3*(-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2)))/r^2 + ((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) -
168*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
36*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
144*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) +
24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2) + 4*r^3*
(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r))/4 +
3*((-15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(6*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3)*(-3 + Csc[theta]^2))))/
(7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))^2 -
(5.*^-9*(-9.000000000000001*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*((3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (21*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4 +
3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2)))/
(r*(7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-2 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)) +
(5.*^-9*(-9.000000000000001*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*((-6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2))/
(r*(7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(1.5000000000000002*^-8*Cos[theta]*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 +
3*Cos[2*theta])))*(1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Cos[theta] -
Cot[theta]*Csc[theta] + 3*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-6.000000000000001*^-8*Cos[theta] + 1.*^-8*Cot[theta]*Csc[
theta])))/(r*(7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))))/
Sqrt[2]))/(Sqrt[2]*r) +
(-1/2*(-3.0000000000000004*^-8*r*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[theta]*Sin[theta]*
((1.5000000000000002*^-8*Cos[theta]*Sin[theta]*
(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4))*
(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
(r*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(1.5000000000000002*^-8*Cos[theta]*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*Sin[theta]*
(1.8*^-15*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + (1 + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(2 - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(4 - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 6.000000000000001*^-8*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)*Cos[2*theta] +
3.0000000000000004*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) + 6.000000000000001*^-8*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(Cos[2*theta] -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^4)))/
((-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(7.500000000000001*^-9*Sin[2*theta]*
(-8.*^-8*(9.*^-8*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3)^2 + (84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)/4 -
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 3*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-1 + 2.5*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*(-1 + 3*Cos[2*theta])))*(-9.*^-8*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)*((-6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^2 + ((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*Sin[theta]^2))/2) +
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
((84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1.*^-8 -
3.0000000000000004*^-8*Cos[2*theta]))/4) +
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[2*theta])*
(-8 + 3.6*^-15*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) -
6.000000000000001*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(4 - 12*Cos[2*theta] - 3.0000000000000004*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 1.8*^-15*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 -
(3.0000000000000004*^-8*Cos[theta]*Sin[theta]*
(((4.5000000000000006*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2 + 3*((3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*(2 -
1.2000000000000002*^-7*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
2.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(-2 +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^2 + ((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*Sin[theta]^2 - 7.500000000000001*^-9*r*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (13*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
((-3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^3 - (2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*
E^(r^2/4))) - 36*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 96*r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
12*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 24*r^2*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 12*r^2*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
4*r^3*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/2 +
r*(3*((-15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(6*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^4 + ((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r^3) - (3*((-105*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (105*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (48*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + (13*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^3 - (3*(-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2)))/r^2 + ((312*r)/E^(r^2/4) - (108*r^3)/
E^(r^2/4) - 168*r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 36*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 144*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
72*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 96*r*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 48*r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
12*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2) + 24*r*(1/(2*E^(r^2/
4)) - r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)))/2 - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r^2*((-5*r)/(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
2) + 24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*
1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2) + 4*r^3*(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/
4)))*(-4 + 1.8*^-15*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 3.0000000000000004*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
1.5000000000000002*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(4 - 12*Cos[2*theta] - 3.0000000000000004*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 9.*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))/2 +
1.*^-8*(-1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3)^2 + 6*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)*(-2 +
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*Sin[theta]^2 - 7.500000000000001*^-9*r*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (13*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2))*((3*((21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (21*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (9*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (2*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 + 3*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta] -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) +
r^2*(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*(
-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*
r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
2)))/r^2 + ((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2)*((5.*^-9*(-9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*((-6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*(
-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2)*
(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
(r^2*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
(5.*^-9*((3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
(3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 +
(((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)))/4))*(r*(2 - 6.000000000000001*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
(r^2*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(4.5*^-16*Cos[theta]^2*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*Sin[theta]^2*
(-1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + 6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(1 + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-2 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)))/
(r*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
(4.5*^-16*Cos[theta]^2*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*Sin[theta]^2*
(6.000000000000001*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] -
((84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/4 + (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(2 - 6.000000000000001*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)))/
(r*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(1.5000000000000002*^-8*(3.0000000000000004*^-8*
(9.*^-8*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3)^2 + (84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)/4 -
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 3*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-1 + 2.5*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*(-1 + 3*Cos[2*theta])))*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*Sin[2*theta]^2 + Cos[theta]^2*
(-3.0000000000000004*^-8*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) -
(-3.0000000000000004*^-8*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*Sin[theta]^2*(-2 + 9.*^-16*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) -
1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
6.000000000000001*^-8*(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2) - 3*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2))*Cos[theta]*Sin[theta]*
Sin[2*theta]*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)))/
(r*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) -
(5.*^-9*r*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)^2*Cos[theta]^2*Sin[theta]^
2 - (1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*(1 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))*(6*((3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(-2 +
3*Sin[theta]^2)*(2 - 6.000000000000001*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3) - 3.0000000000000004*^-8*r*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) + 2*(-6*((3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3) - 3*r*
((-15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(6*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3) +
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/2 +
(3*r*((-105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(105*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(48*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 +
(13*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (3*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/
4))) - 36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*
E^(r^2/4))) + 96*r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
12*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 24*r^2*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 12*r^2*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
4*r^3*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2)))/r^2 +
((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) - 168*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 36*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 144*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
2) + 24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*
1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2) + 4*r^3*(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/4)*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)) + 2.7*^-7*((3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(
-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
Sin[2*theta]^2 + 2.7*^-7*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2) -
(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) +
1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) +
1.35*^-15*r*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
Sin[2*theta]^2)*(3.0000000000000004*^-8*(
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-2 + 3*Sin[theta]^2)*(
1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4)*(1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3)*(2 - 3*Sin[theta]^2)) +
4.5*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2))/
(2*r^2*(-9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)^2*Cos[theta]^2*Sin[theta]^
2 + (1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*(1 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))^2)))/(Sqrt[2]*r) +
(-3.0000000000000004*^-8*r*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[theta]*Sin[theta]*
((3.0000000000000004*^-16*r*Cos[theta]*Sin[theta]*
(-9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2)*
(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 +
(3.0000000000000004*^-16*r*Cos[theta]*Sin[theta]*
(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4))*
((3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
(3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 +
(((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)))/4)))/
((2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
(3.0000000000000004*^-8*r*Cos[theta]*Sin[theta]*
(-1/2*((((-6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 +
(6*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^4 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3) - 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) - 1.*^-8*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r^3) - (3*((21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(21*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^4 + (9*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (2*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) -
(18*r^4)/E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 36*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 96*r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
12*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 24*r^2*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 12*r^2*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
4*r^3*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2)))/r^2 +
((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) - 168*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 36*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 144*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
2) + 24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*
1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2) + 4*r^3*(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/
4))*(-4 + 1.8*^-15*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 3.0000000000000004*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
1.5000000000000002*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(4 - 12*Cos[2*theta] - 3.0000000000000004*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 9.*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
1.*^-8*(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4))*
((3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 +
3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta] -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) +
r^2*(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/r^3) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
((-1.0000000000000001*^-16*
((3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
(3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 +
(((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)))/4))^2)/
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 +
(4.5*^-16*Cos[theta]^2*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 +
3*Cos[2*theta])))*Sin[theta]^2*
(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4)))/
((2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
(1.*^-8*(((9.*^-8*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)^2*(1 +
3*Cos[2*theta]) + 3*((3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (3*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])) + 6*Sin[theta]^2*
(3.0000000000000004*^-8*((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)^2*Cos[theta]^2 +
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
((-6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 +
(6*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r^2)*Cos[theta]^2 + 7.500000000000001*^-9*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*
((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-2 + 3*Sin[theta]^2) +
(((21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(21*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^4 + (9*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (2*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) -
(18*r^4)/E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 36*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 96*r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
12*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 24*r^2*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 12*r^2*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
4*r^3*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2)))/r^2 +
((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) - 168*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 36*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 144*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
2) + 24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*
1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2) + 4*r^3*(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r)*(-1 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)))/4))*(-2 + 9.*^-16*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) -
1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))/2 -
2.5*^-9*(6*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])) - (3*((21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (21*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (9*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (2*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]))*Sin[theta]^2)/2 +
9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)*
((-3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 +
3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 - 3*Cos[2*theta] +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]) - 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2))/
(2*Sqrt[2]*r))/(Sqrt[2]*r))/2 +
((I*Csc[theta]*(((-1/2*I)*r*Sin[theta]*(1 - 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))*
((-5.*^-9*(-9.000000000000001*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*((3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (21*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4 +
3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2)))/
(r*(7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-2 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)) -
(1.*^-8*(-((3.0000000000000004*^-8*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta]) +
1.5000000000000002*^-8*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*((3*((21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (21*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (9*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (2*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4 + 3*((3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2))) +
(-2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta]) + 1.5000000000000002*^-8*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
((3*((-105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(105*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(48*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^4 +
(13*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (3*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2)))/r^2 + ((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) -
168*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
36*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
144*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) +
24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2) + 4*r^3*
(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r)*
Sin[theta]^2)/4 + 3*((-15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (15*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (6*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3)*(1 -
3*Sin[theta]^2))))/(-2 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)^2 +
(5.*^-9*(-9.000000000000001*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*((-6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2))/
(r*(7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(1.5000000000000002*^-8*Cos[theta]*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 +
3*Cos[2*theta])))*(1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Cos[theta] -
Cot[theta]*Csc[theta] + 3*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-6.000000000000001*^-8*Cos[theta] + 1.*^-8*Cot[theta]*Csc[
theta])))/(r*(7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))))/
Sqrt[2] + ((I/2)*r*Sin[theta]*(1 - 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))*
(-1/4*(-9.000000000000001*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r) +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))^2/(r^2*(7.500000000000001*^-9*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-3 +
Csc[theta]^2))^2) + (7.500000000000001*^-17*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
((3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (2*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4 +
3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2)))/
(-2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 4*r^3*
(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
(1.125*^-16*(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)^2 - 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 4*r^3*
(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(7.500000000000001*^-9*r^2*
(2520/(E^(r^2/4)*r^4) - (630*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (297*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^5 - (87*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 +
(19*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (4*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2)))/r^2 + ((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) -
168*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
36*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
144*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*
((-5*r)/(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) +
24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2) + 4*r^3*
(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r) +
4*Csc[theta]^2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta])*Csc[theta]^2 + 3.0000000000000004*^-8*r^2*
(360/(E^(r^2/4)*r^4) - (90*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (39*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^5 - (9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r^3)*
(-3 + Csc[theta]^2)) + (2.25*^-16*r^2*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)^2 + 9.*^-16*r^2*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-1 + 3*Cos[2*theta])*Csc[theta]^2 +
1.8*^-15*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 - 3*Cos[2*theta])^2*Csc[theta]^4 +
9.*^-16*r^2*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)^2*
(1 - 3*Cos[2*theta])^2*Csc[theta]^4 + 4*Csc[theta]^2*
(7.500000000000001*^-9*r^2*(2520/(E^(r^2/4)*r^4) -
(630*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(297*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(87*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^4 +
(19*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (4*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2)))/r^2 + ((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) -
168*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
36*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
144*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) +
24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2) + 4*r^3*
(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r) + 2*
Csc[theta]^2 + 3.0000000000000004*^-8*r^2*
(360/(E^(r^2/4)*r^4) - (90*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (39*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (9*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3)*(-3 + Csc[theta]^2)) -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta])*Csc[theta]^4*(8 + 3.0000000000000004*^-8*
r^2*(360/(E^(r^2/4)*r^4) - (90*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^6 + (39*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^5 - (9*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3)*(-1 +
3*Cos[2*theta]) + 1.5000000000000002*^-8*r^2*
(2520/(E^(r^2/4)*r^4) - (630*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (297*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (87*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + (19*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^3 - (4*(-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2)))/r^2 + ((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) -
168*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
36*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
144*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) +
24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2) + 4*r^3*
(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r)*
Sin[theta]^2))/4)/(2*r^2*(7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r) -
Csc[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))^2) + (7.500000000000001*^-9*
(4*r*(120/(E^(r^2/4)*r^3) - (30*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (15*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (5*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2) -
1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-4 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) +
6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 +
3*Cos[2*theta]) + 1.*^-8*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
Csc[theta]*(1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Cos[theta] -
Cot[theta]*Csc[theta] + 3*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-6.000000000000001*^-8*Cos[theta] + 1.*^-8*Cot[theta]*Csc[
theta]))*Sin[2*theta])/(r^2*(7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(2.5*^-9*(-9.000000000000001*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-3*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(1 + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Sin[2*theta]^2 + 9.*^-8*r*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(1 +
3*Cos[2*theta]) - 9*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)))/
(r^2*(7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-3 + Csc[theta]^2))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))))/
Sqrt[2]))/(Sqrt[2]*r) -
((-3.0000000000000004*^-8*r*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[theta]*Sin[theta]*
((-3.0000000000000004*^-16*Cos[theta]*Sin[theta]*
(-9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2)*
(-1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + 6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
3)*(1 + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2) + 7.500000000000001*^-9*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-2 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 +
(3.0000000000000004*^-16*Cos[theta]*Sin[theta]*
(-1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + 6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
3)*(1 + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2) + 7.500000000000001*^-9*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-2 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2))*
((3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
(3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 +
(((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)))/4)))/
((2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(1.5000000000000002*^-8*Cos[theta]*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 +
3*Cos[2*theta])))*Sin[theta]*
(1.8*^-15*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + (1 + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(2 - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(4 - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 6.000000000000001*^-8*(
-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[
2*theta] + 3.0000000000000004*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) + 6.000000000000001*^-8*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(Cos[2*theta] -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^4)))/
((-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(1.5000000000000002*^-16*Cos[theta]*Sin[theta]*
(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4))*
(-3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
(1 + 3*Cos[2*theta])*(1 + 7.500000000000001*^-9*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Sin[2*theta]^2 + 9.*^-8*r*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(1 +
3*Cos[2*theta]) - 9*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)))/
((2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(7.500000000000001*^-9*Sin[2*theta]*
(-8.*^-8*(9.*^-8*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + (84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)/4 -
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] +
3*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-1 + 2.5*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(-1 + 3*Cos[2*theta])))*
(-9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*Sin[theta]^2))/2) +
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
((84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1.*^-8 -
3.0000000000000004*^-8*Cos[2*theta]))/4) +
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[2*theta])*
(-8 + 3.6*^-15*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 6.000000000000001*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(4 -
12*Cos[2*theta] - 3.0000000000000004*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 1.8*^-15*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 -
(3.0000000000000004*^-8*Cos[theta]*Sin[theta]*
(-((((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*Sin[theta]^2) + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^3 - (2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/
4))) - 36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*
E^(r^2/4))) + 96*r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
12*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 24*r^2*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 12*r^2*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
4*r^3*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/
4))*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
r*(((30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 -
(30*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 +
(15*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^4 -
(5*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r^2)*(1 - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/r^3) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) -
1.*^-8*((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(
3*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3) -
(3*(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (13*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4) + 1.*^-8*(120/(E^(r^2/4)*
r^3) - (30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(
3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4) + 1.*^-8*(-24/(E^(r^2/4)*
r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(
3*((-15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(6*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3) -
(3*((-105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(105*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(48*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 +
(13*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (3*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/
4))) - 36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*
E^(r^2/4))) + 96*r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
12*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 24*r^2*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 12*r^2*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
4*r^3*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2)))/r^2 +
((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) - 168*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 36*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 144*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
2) + 24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*
1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2) + 4*r^3*(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/
4))*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 +
3*Cos[2*theta]) + 1.5000000000000002*^-8*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
1.*^-8*r*(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4))*((3*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 +
3*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(-1 +
3*Cos[2*theta] - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) +
r^2*(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/r^3) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
((5.*^-9*(-9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2)*
(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
(r^2*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 -
3*Sin[theta]^2)))*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
(5.*^-9*((3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
(3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 +
(((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)))/4))*
(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
(r^2*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 -
3*Sin[theta]^2)))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
(4.5*^-16*Cos[theta]^2*(-3.0000000000000004*^-8*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 +
3*Cos[2*theta])))*Sin[theta]^2*(6.000000000000001*^-8*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] -
((84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/4 + (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(2 - 6.000000000000001*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)))/
(r*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(2.25*^-16*Cos[theta]*(4*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2) -
1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-4 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) +
6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 +
3*Cos[2*theta]) + 1.*^-8*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
Sin[theta]*(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4))*Sin[2*theta])/
(r*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(1.5000000000000002*^-8*(3.0000000000000004*^-8*
(9.*^-8*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + (84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)/4 -
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] +
3*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-1 + 2.5*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(-1 + 3*Cos[2*theta])))*
(-3.0000000000000004*^-8*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(
-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 +
3*Cos[2*theta]) + ((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*Sin[2*theta]^2 + Cos[theta]^2*
(-3.0000000000000004*^-8*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(
-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 +
3*Cos[2*theta]) + ((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 +
3*Cos[2*theta]) - 1.5000000000000002*^-8*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) -
(-3.0000000000000004*^-8*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(
-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 +
3*Cos[2*theta]) + ((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))*Sin[theta]^2*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
6.000000000000001*^-8*(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(
-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) -
3*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2))*Cos[theta]*Sin[theta]*
Sin[2*theta]*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 +
3*Cos[2*theta]) - 1.5000000000000002*^-8*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)))/
(r*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) -
(2.5*^-9*(2*(9.000000000000001*^-8*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*((3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(1 +
3*Cos[2*theta]) + 3*((-15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (15*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (6*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])) + 6*Sin[theta]^2*(
3.0000000000000004*^-8*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 +
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
((30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 -
(30*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 +
(15*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 -
(5*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r^2)*Cos[theta]^2 + 7.500000000000001*^-9*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*((21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (21*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (9*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (2*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-2 + 3*Sin[theta]^2) +
(((-105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(105*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(48*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 +
(13*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (3*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/
4))) - 36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*
E^(r^2/4))) + 96*r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
12*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 24*r^2*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 12*r^2*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
4*r^3*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2))/2)))/r^2 +
((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) - 168*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 36*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 144*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
2) + 24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*
1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2) + 4*r^3*(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r)*(-1 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)))/4))*(-2 + 9.*^-16*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 -
3*Sin[theta]^2 + 3.7500000000000005*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
1.*^-8*((-3*(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (13*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 +
3*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(1 -
3*Cos[2*theta] + 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]) - 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)*
(-6*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])) + (3*((21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (21*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (9*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (2*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]))*Sin[theta]^2)/2 -
9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2))/
(2*Sqrt[2]*r) -
(r^2*(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/r^3) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(-1/4*(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)^2/
(r^4*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)^2*Cos[theta]^2*Sin[theta]^
2 - (1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*(1 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))^2) + (7.500000000000001*^-17*
((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
((3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
(3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(
(-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 +
(((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)))/4)))/
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 4*r^3*
(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-16*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
(2.25*^-16*((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*
r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
2)))/r^3 + ((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r^2)*
Cos[theta]^2*(-3.0000000000000004*^-8*((3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 +
3*Cos[2*theta])))*Sin[theta]^2)/
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 4*r^3*
(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-16*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
(2.25*^-16*Cos[theta]*(4*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2) -
1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-4 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) +
6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 +
3*Cos[2*theta]) + 1.*^-8*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
Sin[theta]*(-1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/
E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/r^3)^2 + 6*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-2 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2))*Sin[2*theta])/
(r^2*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
(2.25*^-16*Cos[theta]*(4*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2) -
1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-4 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) +
6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 +
3*Cos[2*theta]) + 1.*^-8*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
Sin[theta]*(6.000000000000001*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] -
((84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta])))/4 + (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(2 - 6.000000000000001*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2))*Sin[2*theta])/
(r^2*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(2.5*^-9*(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)*
(-3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
(1 + 3*Cos[2*theta])*(1 + 7.500000000000001*^-9*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Sin[2*theta]^2 + 9.*^-8*r*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(1 +
3*Cos[2*theta]) - 9*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)))/
(r^3*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 -
3*Sin[theta]^2)))*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(7.500000000000001*^-9*(-6.000000000000001*^-8*
(9.*^-8*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + (84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)/4 -
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] +
3*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-1 + 2.5*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(-1 + 3*Cos[2*theta])))*
(-4*r*(120/(E^(r^2/4)*r^3) - (30*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (15*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (5*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2) +
1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(-4 +
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) -
6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
1.*^-8*r*(120/(E^(r^2/4)*r^3) - (30*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (15*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (5*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
Sin[2*theta]^2 + 2*Cos[2*theta]*(4*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2) -
1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(-4 +
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) +
6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) +
1.*^-8*r*(120/(E^(r^2/4)*r^3) - (30*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (15*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (5*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
6.000000000000001*^-8*(18*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 +
3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(
-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) -
6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2 +
r*(120/(E^(r^2/4)*r^3) - (30*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 + (15*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 - (5*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)))*Sin[2*theta]^2*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)))/
(r^2*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) -
(-2*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))*(r*(2 - 6.000000000000001*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2) +
r*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))*(3.0000000000000004*^-8*r*
(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^4 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-2 + 3*Sin[theta]^2)*
(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) + (2 - 6.000000000000001*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.*^-8*r*
(-9*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3) - 3*r*
(360/(E^(r^2/4)*r^4) - (90*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^6 + (39*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^5 - (9*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^4 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^3) +
(9*(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (13*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4 + (3*r*(2520/(E^(r^2/4)*r^4) -
(630*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(297*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(87*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 +
(19*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (4*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2)))/r^2 + ((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) -
168*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
36*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
144*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) - 12*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
24*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
2) + 24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2) + 4*r^3*
(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/4)*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 3*Sin[theta]^2)) + 1.35*^-15*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2 +
1.35*^-15*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2 +
1.35*^-15*r*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(120/(E^(r^2/4)*r^3) - (30*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (15*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (5*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2) -
r*(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)*
(3.0000000000000004*^-8*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(-2 + 3*Sin[theta]^2)*
(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(3*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3) - (3*(-420/(E^(r^2/4)*
r^3) + (105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4)*(1 + 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(2 - 3*Sin[theta]^2)) + 4.5*^-16*(-24/(E^(r^2/4)*
r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2))/
(2*r^3*(-9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 + (1 - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(2 - 3*Sin[theta]^2)))^2)) - 3.0000000000000004*^-8*r*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[theta]*Sin[theta]*
((1.5000000000000002*^-16*r*((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*
r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
2)))/r^3 + ((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r^2)*
Cos[theta]*Sin[theta]*(-9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*((-6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 + (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 - (3*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
Sin[theta]^2 - (3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^5 - (3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
(-1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 4*r^3*
(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
(1 + 3*Cos[2*theta])*Sin[theta]^2) - 4.5*^-16*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) -
(2.25*^-16*r*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*Cos[theta]*
(1 + 3*Cos[2*theta])*Sin[theta]*
(((-6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(3*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*
(1 - 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
(3*((3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
(3*((21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(21*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(2*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 4*r^3*
(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
(1 + 3*Cos[2*theta])*Sin[theta]^2) - 4.5*^-16*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
(1.5000000000000002*^-8*Cos[theta]*Sin[theta]*
(-1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + 6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
3)*(1 + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2) + 7.500000000000001*^-9*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-2 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2))*
(r*(2 - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
(r^2*(9.*^-16*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*(
12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3) + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(1 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 -
3*Sin[theta]^2)))*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) +
(7.500000000000001*^-9*(4*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2) -
1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - (-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
(-4 + 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) +
6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-2 + 1.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 +
3*Cos[2*theta]) + 1.*^-8*r*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
(1.8*^-15*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + (1 + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
(2 - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) - 3.0000000000000004*^-8*
(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(4 - 3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) + 6.000000000000001*^-8*(
-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[
2*theta] + 3.0000000000000004*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) + 6.000000000000001*^-8*
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 + (24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(Cos[2*theta] -
7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^4))*
Sin[2*theta])/(r*(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) -
(3.0000000000000004*^-8*Cos[theta]*Sin[theta]*
(((4.5000000000000006*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (13*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2 + 3*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3)*(2 -
1.2000000000000002*^-7*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) +
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2) + 1.*^-8*r*
(120/(E^(r^2/4)*r^3) - (30*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 + (15*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 - (5*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2) +
1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*Sin[theta]^2) + (120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*(-2 +
6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) -
1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r)*Sin[theta]^2 - 7.500000000000001*^-9*r*
(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (13*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2) + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*
((-9*(-420/(E^(r^2/4)*r^3) + (105*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (48*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (13*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 - (3*((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2)))/r^2 + (-96/E^(r^2/4) +
(156*r^2)/E^(r^2/4) - (18*r^4)/E^(r^2/4) +
48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 36*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 96*r*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2)/4 + r*(3*(360/(E^(r^2/4)*r^4) -
(90*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(39*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(9*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^4 + ((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
r^3) - (3*(2520/(E^(r^2/4)*r^4) - (630*((12*r^2)/
E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^6 +
(297*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 -
(87*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
r^4 + (19*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) +
48*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
12*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
24*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^3 - (4*(-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) -
(18*r^4)/E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 36*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 96*r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) -
12*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) + 24*r^2*(1/(2*E^(r^2/4)) -
r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
(4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) -
r^3/(8*E^(r^2/4))))/2) + 12*r^2*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) +
4*r^3*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2)))/r^2 +
((312*r)/E^(r^2/4) - (108*r^3)/E^(r^2/4) - 168*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 36*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 144*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 72*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
96*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
48*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2) - 12*r^3*
(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2) + 24*r*
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2) + 24*r^2*((-5*r)/
(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 -
(r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) +
(r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
2) + 24*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*
1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2) + 4*r^3*(-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) +
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 +
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) +
(3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) -
(r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 -
(r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/
4)))*(-4 + 1.8*^-15*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
(1 + 3*Cos[2*theta]) - 3.0000000000000004*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
1.5000000000000002*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(4 - 12*Cos[2*theta] - 3.0000000000000004*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 9.*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))/2 +
1.*^-8*(-1.8*^-7*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + 6*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(1 + 1.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(-2 +
3.0000000000000004*^-8*r*(-60/(E^(r^2/4)*r^3) +
(15*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(6*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^3) -
1.5000000000000002*^-8*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
7.500000000000001*^-9*r*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*Sin[theta]^2))*((3*(-420/(E^(r^2/4)*r^3) +
(105*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 -
(48*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 +
(13*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 -
(3*((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
r^2 + (-96/E^(r^2/4) + (156*r^2)/E^(r^2/4) - (18*r^4)/
E^(r^2/4) + 48*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) -
36*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
96*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) - 12*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
24*r^2*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) +
(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 -
(r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) +
12*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2) + 4*r^3*(-1/4*r/E^(r^2/4) +
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 +
(3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
2))/r)*(2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*
r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/
r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) +
4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 +
3*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(-1 +
3*Cos[2*theta] - 6.000000000000001*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(1 + 3*Cos[2*theta]) + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 9.*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*
r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 +
(3.0000000000000004*^-8*Sin[2*theta]*
((3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(1 +
((84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1.*^-8 -
3.0000000000000004*^-8*Cos[2*theta]))/4) +
6.000000000000001*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] +
6.000000000000001*^-8*r*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*(120/(E^(r^2/4)*r^3) -
(30*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^5 +
(15*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 -
(5*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Cos[2*theta] -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(
3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3) + 6*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[2*theta]))*
(-2 + 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*(
84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 -
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 +
3*Cos[2*theta] + 7.500000000000001*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) + 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) +
1.*^-8*(9.*^-8*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2 + (84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) -
(48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)/4 -
3.0000000000000004*^-8*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] +
3*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)*(-1 + 2.5*^-9*(84/(E^(r^2/4)*r^2) -
(21*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
(9*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 -
(2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(-1 + 3*Cos[2*theta])))*
(-3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(1 +
3*Cos[2*theta])*(1 + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) +
9.*^-8*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2 +
9.*^-8*r*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
120/(E^(r^2/4)*r^3) - (30*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^5 + (15*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^4 - (5*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^3 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2 +
3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(
3*r*(-60/(E^(r^2/4)*r^3) + (15*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^5 - (6*((24*r)/E^(r^2/4) -
(12*r^3)/E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4)))))/r^4 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta]) -
9*(-24/(E^(r^2/4)*r^2) + (6*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 - (3*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 + (24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))))/
(r*(2 - 9.*^-16*(12/(E^(r^2/4)*r^2) - (3*((12*r^2)/E^(r^2/4) -
(2*r^4)/E^(r^2/4)))/r^4 + ((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
r^3 - (2*(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/
E^(r^2/4) + 12*r^2*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))) + 4*r^3*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 +
((-96*r)/E^(r^2/4) + (36*r^3)/E^(r^2/4) + 48*r*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 12*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 24*r^2*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2) + 4*r^3*(3/(4*E^(r^2/4)) -
(3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
Sin[theta]^2 + 3.0000000000000004*^-8*(12/(E^(r^2/4)*r^2) -
(3*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 +
((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
(-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
(84/(E^(r^2/4)*r^2) - (21*((12*r^2)/E^(r^2/4) - (2*r^4)/
E^(r^2/4)))/r^4 + (9*((24*r)/E^(r^2/4) - (12*r^3)/
E^(r^2/4) + 4*r^3*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4)))))/r^3 - (2*(24/E^(r^2/4) - (48*r^2)/
E^(r^2/4) + (6*r^4)/E^(r^2/4) + 12*r^2*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 4*r^3*
(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2)))/r^2 + ((-96*r)/E^(r^2/4) +
(36*r^3)/E^(r^2/4) + 48*r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) - 12*r^3*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))) + 24*r^2*(r/(2*E^(r^2/4)) -
(r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) +
4*r^3*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) -
(r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
(4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
Sin[theta]^2) - 4.5*^-16*(-24/(E^(r^2/4)*r^2) +
(6*((12*r^2)/E^(r^2/4) - (2*r^4)/E^(r^2/4)))/r^4 -
(3*((24*r)/E^(r^2/4) - (12*r^3)/E^(r^2/4) + 4*r^3*
(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 +
(24/E^(r^2/4) - (48*r^2)/E^(r^2/4) + (6*r^4)/E^(r^2/4) +
12*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) +
4*r^3*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) +
r^2/(4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2)))/
(2*Sqrt[2]*r))/(Sqrt[2]*r))/2