(((-I)*Csc[theta]*(((-1/2*I)*r*Sin[theta]* (1 - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))* ((-1.*^-12*((3*((21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4 + 3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)^2 - (1.*^-6*(-5.*^-7*(3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/2)^2 + (-2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* ((3*((21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (21*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 - (2*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^3)*(1 - 3*Sin[theta]^2))))/ (-2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)^2))/ Sqrt[2] + ((I/2)*r*Sin[theta]*(1 - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))* ((5.*^-7*(7.5*^-7*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*((3*((21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r))/4 + 3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r))/4 + 3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))* ((3*((-105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (105*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (48*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 - (3*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (6*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^3)*(-3 + Csc[theta]^2))))/ (7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))^2 - (5.*^-7*(-9.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) + 7.5*^-7*r* (-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r) - 2*Csc[theta]^2 + 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*((3*((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4 + 3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)) + (5.*^-7*(-9.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) + 7.5*^-7*r* (-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r) - 2*Csc[theta]^2 + 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2))/2))/(r*(7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*Cos[theta]*(-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 3*Cos[2*theta])))*(1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Cos[theta] - Cot[theta]*Csc[theta] + 3*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-6.*^-6*Cos[theta] + 1.*^-6*Cot[theta]*Csc[theta])))/ (r*(7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*Cos[theta]*Sin[theta]* (((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(1 - 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4))* (r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6* r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)))*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*Cos[theta]*(-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + (1 + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2)*(2 - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(4 - 3.*^-6*r* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 7.5*^-7*r* (-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) + 6.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^4)))/ ((-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*Sin[2*theta]*(-8.*^-6*(9.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2 + (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)/4 - 3.*^-6* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 2.5*^-7* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(-1 + 3*Cos[2*theta])))*(-9.*^-6* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[theta]^2*Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2))/2) + (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1.*^-6 - 3.*^-6*Cos[2*theta]))/4) + 3.*^-6* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[2*theta])*(-8 + 3.6*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 6.*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(4 - 12*Cos[2*theta] - 3.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 1.8*^-11* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*Cos[theta]*Sin[theta]*(((4.5*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2 + 3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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 - 0.000012* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 2.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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.5*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2) + ((-6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(-2 + 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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.5*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/2 + r*(3*((-15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (6*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^3) - (3*((-105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (105*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (48*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/ 4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 - (3*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 48* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 3.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2 + 1.5*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(4 - 12*Cos[2*theta] - 3.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 9.*^-12* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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.*^-6*(-0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 1.*^-6*(-96/(E^(r^2/4)* r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2) + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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.5*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2))*((3*((21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 + 3*Cos[2*theta]) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Sin[2*theta]^2)))/(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2)*((5.*^-7*(-9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2))/2)*(r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)))*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-7*((3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[theta]^2 + (((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-1 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6* r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)))*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-12*Cos[theta]^2*(-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 3*Cos[2*theta])))* Sin[theta]^2*(-0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 1.*^-6* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)))/ (r*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-12*Cos[theta]^2*(-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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] - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)*( 2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 + 3*Cos[2*theta])))/4 + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)))/ (r*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(3.*^-6*(9.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)/4 - 3.*^-6* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 2.5*^-7* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(-1 + 3*Cos[2*theta])))*(-3.*^-6* ((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 + 3*Cos[2*theta])))*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-12* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-12* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-12* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*((-6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2))*Cos[theta]*Sin[theta]*Sin[2*theta]*(-2 + 9.*^-12* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-12* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-7*r*(9.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)*(1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)))*(6*((3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)* r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) + 2*(-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (6*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^3) + (3*((21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/2 + (3*r*((-105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (105*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (48*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^3 - (3*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-2 + 3*Sin[theta]^2)) + 0.000027*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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 + 0.000027*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*( (-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2) - (r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2) + 1.*^-6*(3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4)*(1 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 3*Sin[theta]^2)) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2))/ (2*r^2*(-9.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)*(1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*r*Cos[theta]*Sin[theta]*(-9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2))/2)*(((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (1 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4)))/ (2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*r*Cos[theta]*Sin[theta]* (((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (1 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4))* ((3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[theta]^2 + (((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-1 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-2 + 3*Sin[theta]^2)))/4)))/ ((2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*Cos[theta]*Sin[theta]* (-1/2*((((-6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 + (6*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) - 1.*^-6* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^3) - (3*((21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (21*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 - (2*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 48* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r* (-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*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 3.*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 1.5*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(4 - 12*Cos[2*theta] - 3.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 9.*^-12* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(1 - 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4))* ((3*((21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*(2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 + 3*Cos[2*theta]) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Sin[2*theta]^2)))/ (2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2) + 16*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))/r)*Sin[theta]^2)* ((-1.*^-12*((3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[theta]^2 + (((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-1 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-12*Cos[theta]^2*(-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (1 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4)))/ ((2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(((9.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^3)*(2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)^2*Cos[theta]^2 + 3.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 + (6*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^3 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r^2)*Cos[theta]^2 + 7.5*^-7*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-2 + 3*Sin[theta]^2) + (((21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (21*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 - (2*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 48* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r* (-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-2 + 3*Sin[theta]^2)))/4))*(-2 + 9.*^-12* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-12* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-7*(6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 3*Cos[2*theta])) - (3*((21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*(2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Sin[2*theta]^2)*((-3*((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 + 3*Cos[2*theta]) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Sin[2*theta]^2)))/ (2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))* ((-5.*^-7*(-9.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) + 7.5*^-7*r* (-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r) - 2*Csc[theta]^2 + 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*((3*((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4 + 3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)) - (1.*^-6*(-((3.*^-6*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*((3*((21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4 + 3* ((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* ((3*((-105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (105*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (48*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 - (3*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^6 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (6*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^3)*(1 - 3*Sin[theta]^2))))/(-2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)^2 + (5.*^-7*(-9.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) + 7.5*^-7*r* (-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r) - 2*Csc[theta]^2 + 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2))/2))/(r*(7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*Cos[theta]*(-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 3*Cos[2*theta])))*(1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Cos[theta] - Cot[theta]*Csc[theta] + 3*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-6.*^-6*Cos[theta] + 1.*^-6*Cot[theta]*Csc[theta])))/ (r*(7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))* (-1/4*(-9.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) + 7.5*^-7*r* (-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r) - 2*Csc[theta]^2 + 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))^2/(r^2*(7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))^2) + (7.5*^-13*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4 + 3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + (1.125*^-12*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)^2 - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)* (7.5*^-7*r^2*(10080/(E^(r^2/4)*r^6) - (630*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (297*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (87*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^3 - (4*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*r^2* (1440/(E^(r^2/4)*r^6) - (90*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^6 + (39*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^3)*(-3 + Csc[theta]^2)) + (2.25*^-12*r^2*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)^2 + 9.000000000000001*^-12*r^2*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/r^3)*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-1 + 3*Cos[2*theta])*Csc[theta]^2 + 1.8*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-12*r^2* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*r^2* (10080/(E^(r^2/4)*r^6) - (630*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^6 + (297*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (87*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^3 - (4*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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.*^-6*r^2*(1440/(E^(r^2/4)*r^6) - (90*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (39*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^3)*(-3 + Csc[theta]^2)) - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-6*r^2* (1440/(E^(r^2/4)*r^6) - (90*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^6 + (39*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^3)*(-1 + 3*Cos[2*theta]) + 1.5*^-6*r^2* (10080/(E^(r^2/4)*r^6) - (630*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^6 + (297*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (87*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^3 - (4*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))^2) + (7.5*^-7*(4*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2) - 0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 1.*^-6*(-96/(E^(r^2/4)* r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(1 + 3*Cos[2*theta])))*Csc[theta]* (1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Cos[theta] - Cot[theta]*Csc[theta] + 3*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-6.*^-6*Cos[theta] + 1.*^-6*Cot[theta]*Csc[theta]))*Sin[2*theta])/ (r^2*(7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-7*(-9.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) + 7.5*^-7*r* (-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r) - 2*Csc[theta]^2 + 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)* (480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r) - Csc[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-3 + Csc[theta]^2))*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*Cos[theta]*Sin[theta]*(-9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2))/2)*(-0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)))/ (2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*Cos[theta]*Sin[theta]*(-0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2))* ((3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[theta]^2 + (((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-1 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-2 + 3*Sin[theta]^2)))/4)))/ ((2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*Cos[theta]*(-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + (1 + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2)*(2 - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (4 - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) + 6.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^4)))/ ((-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-12*Cos[theta]*Sin[theta]* (((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (1 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4))* (-3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/r^2)*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*Sin[2*theta]*(-8.*^-6*(9.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2 + (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)/4 - 3.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 2.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(-1 + 3*Cos[2*theta])))* (-9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2))/2) + (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1.*^-6 - 3.*^-6* Cos[2*theta]))/4) + 3.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[2*theta])*(-8 + 3.6*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 6.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(4 - 12*Cos[2*theta] - 3.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 1.8*^-11*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*Cos[theta]*Sin[theta]* (-((((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(1 - 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4))*(2 - 9.*^-12* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) - 4.5*^-12* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 - (30*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 + (15*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r^2)*(1 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) - 1.*^-6*((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*( 3*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/ 4) + 1.*^-6*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4) + 1.*^-6*(-96/(E^(r^2/4)* r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (6*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^3) - (3*((-105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (105*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (48*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 - (3*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 48* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r* (-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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(1 - 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4))*((3*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*(2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 + 3*Cos[2*theta]) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/r^2)*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2)))/ (2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2) + 16*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))/r)*Sin[theta]^2)* ((5.*^-7*(-9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2))/2)*(r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)* (-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 3*Sin[theta]^2)))*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-7*((3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[theta]^2 + (((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-1 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 3*Sin[theta]^2)))*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-12*Cos[theta]^2*(-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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] - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 3*Cos[2*theta])))/4 + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*( 48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)* r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)))/ (r*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-12*Cos[theta]*(4*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2) - 0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 1.*^-6*(-96/(E^(r^2/4)* r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(1 + 3*Cos[2*theta])))*Sin[theta]* (((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (1 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4))*Sin[2*theta])/ (r*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(3.*^-6*(9.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)/4 - 3.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 2.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(-1 + 3*Cos[2*theta])))* (-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 3*Cos[2*theta])))* (-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(3*((3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*((-6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2))*Cos[theta]*Sin[theta]*Sin[2*theta]* (-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-7*(2*(9.*^-6*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (6*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^3)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* ((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2 + 3.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 - (30*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 + (15*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^3 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r^2)*Cos[theta]^2 + 7.5*^-7*(-240/(E^(r^2/4)* r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-2 + 3*Sin[theta]^2) + (((-105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^6 + (105*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (48*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^3 - (3*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-2 + 3*Sin[theta]^2)))/4))*(-2 + 9.*^-12* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*((-3*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*(2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 + 3*Cos[2*theta]) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/r^2)*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2)* (-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 3*Cos[2*theta])) + (3*((21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*(2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Sin[2*theta]^2)))/ (2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2) + 16*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))/r)*Sin[theta]^2)* (-1/4*(r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6* r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)*(1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)))^2) + (7.5*^-13*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*Cos[theta]^2 + (((21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*(-1 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-2 + 3*Sin[theta]^2)))/4)))/ (-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-12*((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* (-3.*^-6*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-12*Cos[theta]*(4*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2) - 0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 1.*^-6*(-96/(E^(r^2/4)* r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(1 + 3*Cos[2*theta])))*Sin[theta]* (-0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2))*Sin[2*theta])/ (r^2*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-12*Cos[theta]*(4*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2) - 0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 1.*^-6*(-96/(E^(r^2/4)* r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(1 + 3*Cos[2*theta])))*Sin[theta]* (6.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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] - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(2 + 3.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 3*Cos[2*theta])))/4 + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*( 48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)* r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2))* Sin[2*theta])/(r^2*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*^-7*(r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/r^2)*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 3*Sin[theta]^2)))*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(-6.*^-6*(9.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)/4 - 3.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 2.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(-1 + 3*Cos[2*theta])))* (-4*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2) + 0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(1 + 3*Cos[2*theta])))*Sin[2*theta]^2 + 2*Cos[2*theta]*(4*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2) - 0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(1 + 3*Cos[2*theta])))*(-2 + 9.*^-12* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(18*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2 + 3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)))*Sin[2*theta]^2* (-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)))*(r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)))*(3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) + (2 - 6.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.*^-6*r*(-9*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(1440/(E^(r^2/4)*r^6) - (90*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^6 + (39*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^3) + (9*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4 + (3*r*(10080/(E^(r^2/4)*r^6) - (630*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^6 + (297*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (87*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^3 - (4*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.3499999999999999*^-11*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2) - r*(r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6* r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + 1.*^-6*(3*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/r^2)*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2))/ (2*r^3*(-9.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (2 - 3*Sin[theta]^2)))^2)) - 3.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-12*r*((-6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/ 2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]*Sin[theta]* (-9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[theta]^2* Sin[theta]^2 - (3*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2))/2))/(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.2500000000000003*^-12*r*((3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (3*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)* (1 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (21*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/4)))/ (2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*Cos[theta]*Sin[theta]*(-0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^ 4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2))* (r*(2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)*(-1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-2 + 3*Sin[theta]^2)) + 1.3499999999999999*^-11*r*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2)* (1 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 3*Sin[theta]^2)))*(2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(4*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2) - 0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*( -240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 1.*^-6*(-96/(E^(r^2/4)* r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2)*(1 + 3*Cos[2*theta])))* (1.8*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + (1 + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2)*(2 - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (4 - 3.*^-6*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) + 6.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^4))* Sin[2*theta])/(r*(-2 + 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 6.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 - 3*Sin[theta]^2 + 3.75*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*Cos[theta]*Sin[theta]* (((4.5*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2 + 3* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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 - 0.000012*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 3.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2* 1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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.*^-6*r* (480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^2) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2) + (480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*(-2 + 6.*^-6* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2) + 1.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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)))/ r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/ (8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2)/ 4 + r*(3*(1440/(E^(r^2/4)*r^6) - (90*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (39*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (9*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^4 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r^3) - (3*(10080/(E^(r^2/4)*r^6) - (630*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^6 + (297*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - (87*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/ r^3 - (4*(8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 16*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)))/r^2 + ((-8*r)/E^(r^2/4) + 8*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 48*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 16*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) + 64*(-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) + 16*r*(-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*^-11*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 3.*^-6* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 + 1.5*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(4 - 12*Cos[2*theta] - 3.*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 9.*^-12* (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(-0.000018*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 1.*^-6*(-96/(E^(r^2/4)* r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2) + (-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r* (-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*Sin[theta]^2 - 7.5*^-7*r*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*Sin[theta]^2))*((3*(-1680/(E^(r^2/4)*r^5) + (105*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (48*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (13*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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*((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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)))/r^2 + (8/E^(r^2/4) - (4*r^2)/E^(r^2/4) - 32*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) - 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2) + 16*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))/r)*(2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-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*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (1 + 3*Cos[2*theta]) + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/r^2)*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2)))/ (2 - 9.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*Sin[2*theta]*((3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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 + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1.*^-6 - 3.*^-6* Cos[2*theta]))/4) + 6.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*( 480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Cos[2*theta] - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*( 3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/r)* Sin[theta]^2 - 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*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))/ r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*(9.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2 + (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)/4 - 3.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*(-1 + 2.5*^-7*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(-1 + 3*Cos[2*theta])))* (-3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2) + 9.*^-6*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-6*r*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/r^2)*(480/(E^(r^2/4)*r^5) - (30*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^5 + (15*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - (5*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r^2)*Sin[2*theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*( 3*r*(-240/(E^(r^2/4)*r^5) + (15*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^5 - (6*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + (-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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.*^-12*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (1 + 3*Cos[2*theta]) + 1.5*^-6*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*Sin[theta]^2 + 3.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* (-1 + 3*Cos[2*theta] + 7.5*^-7*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*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))/r)*(1 + 3*Cos[2*theta])* Sin[theta]^2) - 4.5*^-12*(-96/(E^(r^2/4)*r^4) + (6*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (3*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (-16/E^(r^2/4) + (8*r^2)/ E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(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